Pada kesempatan ini kita akan membuat sebuah aplikasi sederhana. Langkah pertama yang kita lakukan adalah menjalakankan aplikasi delphi.
Delphi akan terbuka, secara default delphi akan menampilkan form seperti berikut.
Setelah itu desainlah form hingga menjadi seperti berikut.
Berikut adalah object yang digunakan beserta propertiesnya :
Object Name Caption
Label Label1 Nama
Label2 Kelas
Label3 NPM
Label4 Ouput
Edit Edit1
Edit2
Edit3
Button Button1 OK
Selanjutnya adalah pengkodean (coding), pada kesempatan kali ini kita hanya coding pada satu object yaitu Button1. Caranya dengan klik 2x Button1, berikut adalah codenya :
procedure TForm1.Button1Click(Sender: TObject);
begin
Label4.Caption := 'Nama Saya '+Edit1.Text+#13+' Kelas '+edit2.Text+#13+' NPM '+edit3.text;
end;
Pada coding tersebut berarti :
procedure TForm1.Button1Click(Sender: TObject); : batas awal pengkodean pada Button1.
Label4.Caption := : Mengubah atau menggati isi/teks dari Label4.
'Nama Saya ' : Menampilkan teks “Nama Saya “
+ : mengabungkan atau menambahkan teks baru dengan teks sebelumnya.
Edit1.Text : Menampilkan isi/teks dari Edit1.
Edit2.Text : Menampilkan isi/teks dari Edit2.
Edit3.Text: Menampilkan isi/teks dari Edit3.
#13 : Memberikan Enter pada label / membuat baris baru (bisa digantikan dengan slinebreak)
Berikut adalah tampilan aplikasi sedang dijalankan :
Selesai.
Tidak ada komentar:
Posting Komentar