Contoh Program Pembalik Kata pada Delphi

Berikut ini adalah contoh program Pembalik Kata pada Delphi.

• Interface Program

• Coding Program 

Nama Komponen	Event	Perintah
Button1	OnClick	procedure TForm1.Button1Click(Sender: TObject); var i,j:integer; begin j:=strtoint(edit2.text); for i:=1 to j do listbox.Items.Add(edit1.text) end;
Button2	OnClick	procedure TForm1.Button2Click(Sender: TObject); begin edit1.Clear; edit2.Clear; listbox.Clear; end;
Button3	OnClick	procedure TForm1.Button3Click(Sender: TObject); begin close; end;

Setelah source code tersebut dimasukkan pada masing-masing button maka program siap untuk dijalankan.

Sekian contoh program pembalik kata dari saya, semoga bermanfaat. Terima kasih..


Untuk download programnya, silahkan download (DISINI)