Friday, February 22, 2013

Program Penjumlahan Dengan Delphi



  1. Buka Aplikasi Borland Delphi
  2. Letakkan komponen Edit text sebanyak 3 kali dan label sebanyak 4, lihat gambar 1
  3. Buka Propertis Caption untuk Form 1, ganti dengan nama "Program Penjumlahan" dan untuk border style pilis "bsDialog", agar aplikasi tampil ditengan layar saat dijalankan pilih position "poDesktopCenter"
  4. Masih di form1, pilih properti events OnActive dan ketikan edit1.text:=""; dan lakukan untuk semua edit text agar tampil kosong saat dijalankan
  5. Karena program ini akan menghasilkan penjumlahan 2 bilangan setelah bilangan kedua dimasukkan, maka kita perlu memasukan koden program pada edit2.text pada bagian properti event OnExit dan klik 2 kali sehingga akan masuk ke unit1.pas dan kemudia ketikan program berikut


    • sisipkan code var a,b,c:integer; di atas kata begin
    • masukan kode program berikut diantara begin dan end;
      • a:=strtoint(edit1.Text);
      • b:=strtoint(edit2.Text);
      • c:=a+b;
      • edit3.Text:=inttostr(c);
Jalankan program, isikan angkan pada kotak bilangan I, kemudian tekan tombol tab dari keyboard untuk berpindah ke bilangan II, dan untuk melihat hasil penjumlahan ketik tab

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.