pertama tama pilih tools standart dibawah ini..

setelah itu pilih toolsl "ok" pada menu standart
maka akan hasilnya seperti ini
semoga moga gak salah yaaa samapai sini hehe...
setelah semua itu selesai, dibawah Tabel menu "Object Treeview" ada tabel menu "Object Inspector"
ganti "Form1" menjadi "Button1" lalu pilih caption untuk mengganti nama, coba anda tulis "Merah"
dan ganti juga caption pada "Button2" menjadi "Biru" jika benar maka tampilannya seperti berikut..
setelah itu klik 2 kali pada "Button1" lalu masukkan program seperti ini
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Color:=clred
end;
setelah itu klik 2 kalli pada "Button2"
procedure TForm1.Button2Click(Sender: TObject);
begin
Form1.Color:=clblue
end;
setelah sampai pada tahap ini anda membuat program dengan benar, jika anda menjalan kan program dengan menekan tombol f9, tampilannya seperti berikut..
ini ketika diklik Button1 atau Merah maka backgroundnya akan berubah merah
dan jika di tekan Button2 atau biru maka backgroundnya akan berubah biru
Trimakasih selamat mencoba...
ini hanya memakai menu standart belum dengan menu yang lainnya.. :D







0 komentar:
Posting Komentar