Aplikasi Looping Sedehana (Delphi)


Adapun postingan ini saya buat adalah untuk sambungan postingan sebelumnya, yaitu Aplikasi Login Sederhana, karna dalam file exe nya sudah saya sertakan Program Loopingnya...
Cekidot.....

procedure TForm2.Button1Click(Sender: TObject);

var a,b,num : integer;

begin

a := strtoint(edit1.Text);

b := strtoint(edit2.Text);

for num :=  a to b do

showmessage (inttostr(num));

end;

Comments

Popular posts from this blog

Cara Optimalkan PES 2013 Pada PC Spek Rendah

Serial Key Windows XP Profesional SP 2

ID Flexi Wifi.id Februari 2015