1. Buka aplikasi Delphi 7 yang sudah diinstal di laptop atau komputer kemudian akan muncul tampilan seperti berikut ini:
Klik simbol label, edit, dan button untuk menambahkan komponen tersebut dalam desain form perkenalan diri lalu atur tata letaknya sesuai kehendak hati.
Properties |
Object |
Value |
Label 1 |
Caption
|
Program
Perkenalan Diri di Delphi 7 |
Label 2 |
Caption
|
NIM |
Label 3 |
Caption
|
Program
Studi |
Label 4 |
Caption
|
Nama |
Label 5 |
Caption
|
Alamat |
Edit 1 |
Text
|
Kosongi |
Edit 2 |
Text |
Kosongi |
Edit 3 |
Text |
Kosongi |
Edit 4 |
Text |
Kosongi |
Button 1 |
Caption
|
Exit |
5. Setelah desain form selesai, langkah selanjutnya adalah memasukkan kode agar program perkenalan diri di Delphi 7 dapat dijalankan. Yang haus dilakukan pertama kali ialah klik Events yang terletak pada bagian Object Inspector. Lalu, klik OnCreate dan masukkan kode ini di bawah tulisan begin:
Edit1.Text:='Isi NIM';
Edit2.Text:='Isi Program Studi';
Edit3.Text:='Isi Nama';
Edit4.Text:='Isi Alamat';
6. Langkah selanjutnya, yaitu klik dua kali pada Button 1 Exit dan masukkan kode ini di bawah tulisan begin:
Close;
7. Setelah semua kode dimasukkan, maka naskah kode pada Unit1 akan menjadi seperti di bawah ini:
unit
Unit1;
interface
uses
Windows, Messages, SysUtils, Variants,
Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R
*.dfm}
procedure
TForm1.FormCreate(Sender: TObject);
begin
Edit1.Text:='Isi
NIM';
Edit2.Text:='Isi
Program Studi';
Edit3.Text:='Isi
Nama';
Edit4.Text:='Isi
Alamat';
end;
procedure
TForm1.Button1Click(Sender: TObject);
begin
Close;
end;
end.
8. Selanjutnya klik File lalu Save All. Simpan project dan unit sebelum program dijalankan.
9. Setelah disimpan, program siap dijalankan dengan cara klik Run.
10. Setelah program dijalankan atau di run, maka akan muncul output seperti di bawah ini:
Klik
button Exit untuk keluar dari
program perkenalan diri Delphi 7.
Terima kasih, semoga bermanfaat…..
Tidak ada komentar:
Posting Komentar