CONTOH PROGRAM PENJUMLAHAN DI DELPHI d45sa4d45
Oke kali ini ane akan berbagi cara membuat programpenjumlahan sederhana menggunakan bahasa pemrograman Delphi. Biasanya program penjumlahan ini berguna untukmembuat program penjualan.
Oke langsung aja agan bikin desain form seperti ini :
Klik dua kali pada tombol “JUMLAHKAN” dan silahkan agan isikan mantranya seperti ini :
procedure TForm1.Button1Click(Sender: TObject);
var
ANGKAPERTAMA, ANGKAKEDUA:INTEGER;
begin
ANGKAPERTAMA:=STRTOINT(EDIT1.TEXT);
ANGKAKEDUA:=STRTOINT(EDIT2.TEXT);
EDIT3.Text:=INTTOSTR(ANGKAPERTAMA+ANGKAKEDUA);
end;
kalau mantra di atas sudah diketik silahkan agan jalankan. Dan seperti ini hasilnya :
No comments:
Post a Comment