
Kemudian klik 2x
pada Button BtnSalam dan ketikkan listing berikut.
procedure
TForm1.BtnSalamClick(Sender: TObject);
begin
label3.Caption := 'Lonhananan';
label4.Caption := 'Tumpok Teungoh';
end;
untuk listing Button BtnTutup dan ketikkan listing berikut.
procedure
TForm1.BtnTutupClick(Sender: TObject);
begin
application.Terminate; //bisa juga
digantikan dengan perintah Close;
end;
dan ada beberapa lagi contoh program sederhana pada modul ini..
0 Response to "Tutorial Delphi"
Post a Comment