Nah sekarang gw punya tutorial cara bikin program penggajian pake dephi….gampang kok ga susah susah amat …. langkah pertama ::

–Buka Aplikasi Delphi … untuk versinya terserah yang km mau aja

==na ini source kode nya==

var

Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.BitBtn3Click(Sender: TObject);

begin

Close;

end;

procedure TForm1.bitbtn1Click(Sender: TObject);

var

Gaji : real;

Astek: real;

begin

Astek:=0.02*StrToint(EdtGapok.text)+strToint(EdtTunjangan.text);

Gaji:=StrToint(EdtGapok.Text)+strToint(EdtTunjangan.text)- Astek;

//tampilkan

EdtAstek.text:=floattoStr(Astek);

EdtHasil.Text:=floattostr(gaji);

end;

procedure TForm1.BitBtn2Click(Sender: TObject);

begin

EdtNIP.text:=”;

EdtNama.text:=”;

EdtAlamat.text:=”;

EdtJabatan.Text:=”;

EdtGapok.Text:=”;

EdtTunjangan.text:=”;

EdtAstek.Text:=”;

EdtHasil.Text:=”;

end;

end.

Nah Ini Hasilnya

Gut Luck Friend