Cara Membuat Aplikasi Input Output Serderhana Menggunakan Borland Delphi 7

Sekilas Tentang Delphi.

Delphi dikembangkan oleh Perusahaan Borland dari bahasa Pemrograman Pascal. Delphi membagi program menjadi dua bagian yaitu bagian primer berupa file program yang mengkordinisi keseluruhan program, file ini berekstensi *.dpr, sedangkan bagian sekunder merupakan bagian yang melaksanakan tugas-tugas tertentu dan lazim disebut unit (atau rutin) file ini berekstensi*.pas.

Mungkin hanya itu sekilas dari Delphi……..agar tidak ngantuk karena membaca artikel ini langsung saja sob….kita mulai membuat desain form tentang input output data.

Dibawah ini adalah gambar desain awal pembuatan form nya…..

Aturlah properties controlnya terlebih dahulu seperti pada tabel yang ada di bawah ini.

Nama Control	Properties	Nilai Pengaturan
GroupBox1	Caption	Input Data
GroupBox2	Caption	Output Data
Form	Caption	Program Input dan Output
Text1	Caption	Kosongkan
Text2	Caption	Kosongkan
Text3	Caption	Kosongkan
Text4	Caption	Kosongkan
Text5	Caption	Kosongkan
Text6	Caption	Kosongkan
Text7	Caption	Kosongkan
Text8	Caption	Kosongkan
Button1	Caption	&Input Data
Button2	Caption	&Ulang
Button3	Caption	&Close

Ketika Sudah di atur kita tinggal membuat kede program nya saja.

Dibawah ini adalah listing program tersebut.

Pertama Double klick Button1 dan isikan listing program dibawah ini.

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
edit8.Text:=edit4.Text;
edit7.Text:=edit3.Text;
edit6.Text:=edit2.Text;
edit5.text:=edit1.Text;

end;

Kedua Double klick Button2 dan isikan listing program dibawah ini.

procedure TForm1.BitBtn2Click(Sender: TObject);
beginedit1.Clear;
edit2.Clear;
edit3.Clear;
edit4.Clear;
edit5.Clear;
edit6.Clear;
edit7.Clear;
edit8.Clear;
edit1.SetFocus
end;

end.

Ketiga Double klick Button3 dan isikan listing program dibawah ini.

procedure TForm1.BitBtn3Click(Sender: TObject);
begin

Close

end;

end.

Nah sobat ketika sudah selesai mengetikan kodingnya sobat sobat jangan lupa save dulu project nya di folder sobat nama Unit dan project nya bebas,,,,,asalkan jangan ada spasi saja. rolling on the floor