Belajar Delphi Part 2

Setelah di postingan pertama kita mengenal sejarah delphi dan mempraktekan program newbie sederhana kita,sekarang mari kita lanjutkan latihannya :D
kalo kemarin baru 1 button yang kita pakai,,sekarang kita pakai label dan button oke? :) dan tentunya kita akan membuat aplikasi newbie standar kelas bawah dulu (sama kaya aku :x )
me<----------- Low Level :x :x :x :x :x :x

komponen label masih ada di keluarga palette standar,,


oke sekarang kita mulai latihannya . . . . .

1. lets begin with open your Delphi.
2. bis itu tambahkan 3 button dan 3 label pada pallete standar

3.hilangkan caption di object inspector pada masing-masing label dan beri caption pada button seperti pada gambar

atau caption button itu terserah apa aja deh :D :k
4. sekarang dobel klik pada komponen button1 dan beri rumus kaya gene niih
procedure TForm1.Button1Click(Sender: TObject);
begin
label1.caption:='Bagaimana perasaanmu ketika belajar Delphi?';
end;
5. dobel klik juga pada button2 dan kasih rumus :
procedure TForm1.Button2Click(Sender: TObject);
begin
label2.Caption:='Ternyata mudah banget ya?';
end;
6. dan pada button3 dengan nama bersih beri rumus :
procedure TForm1.Button3Click(Sender: TObject);
begin
label1.caption:='';
label2.caption:='';
end;
7. coba deh jalankan (F9) lalu klik klik tuh button yang sudah kamu buat brusan tadi :D ,,easy bgt bukan? :)

caption pada masing-masing label bisa kamu ganti menjadi apa saja juga ko..ini hanya sekedar contoh hehehehe :$

Posted in: Delphi