Perulangan merupakan aktifitas yang sama yang dilakukan secara berulang ulang di dalam sebuah program. Perulangan ini bisa proses pencarian, pencetakan dan sebagainya.
Delphi mempunyai fasilitas perulangan tak bersyarat yaitu perulangan/looping For.
syntax :
For ... to
contoh :
Delphi mempunyai fasilitas perulangan tak bersyarat yaitu perulangan/looping For.
syntax :
For ... to
contoh :
- procedure TForm1.Button2Click(Sender: TObject);
- var x:integer;
- begin
- for x:=1 to 5 do
- begin
- memo1.Lines.Add(inttostr(x));
- end;
- end;
- perintah di atas jika dilakukan dengan manual maka sebagai berikut
- procedure TForm1.Button2Click(Sender: TObject);
- begin
- memo1.Lines.Add(inttostr(1));
- memo1.Lines.Add(inttostr(2));
- memo1.Lines.Add(inttostr(3));
- memo1.Lines.Add(inttostr(4));
- memo1.Lines.Add(inttostr(5));
- end;
0 Reply :
Posting Komentar
Jika ada pertanyaan atau request,Komentar pada tab blogger akan lebih memudahkan saya untuk membalasnya karena lebih mudah melakukan pengecekan komentar.