Tab Additional II

I.         Tujuan Praktikum

Tujuan dari praktikum kali yaitu untuk mengenal lebih dalam, tab additional pada delphi. Selain itu para parktikan sendiri harus tau , fungsi dan penggunaan dari tab additional, dan tentunya para praktikan harus tau cara membuat sebuah program delphi dengan menggunakan tab additional. Mulai dari tahap membuat program sampai tahap menjalankan program.

II.      Deskripsi Program

Program yang saya buat pada praktikum kali ini yaitu program biodata. Seperti terlihat dari namanya, program ini berfungsi untuk menampilkan biodata berupa nama, id, nim, tanggal, waktu, serta nomor telepon

Program yang akan saya buat mengunakan bagian – bagian dari tab additional, seperti speedbutton, bitbutton, stringgrid,  dan lain - lain.

III.         Interface Program  

IV. Coding Program

Nama Komponen	Event	Perintah
Speedbutton1	On Click	procedure TForm1.SpeedButton1Click(Sender: TObject); begin form2.show; form2.stringgrid1.Cells[1,1]:=form1.edit1.Text; form2.stringgrid1.Cells[2,1]:=form1.maskedit2.Text; form2.stringgrid1.Cells[3,1]:=form1.maskedit3.Text; form2.stringgrid1.Cells[4,1]:=form1.maskedit4.Text; form2.stringgrid1.Cells[5,1]:=form1.maskedit5.text; end;
Bitbtn1	On Click	procedure TForm1.BitBtn2Click(Sender: TObject); begin close; end;

 

V. Ouput