24 Jun 2012

Aplikasi Kalkulator Menggunakan Delphi

Posted by Unknown on 24 Jun 2012

Salam berjaya buat sobat blogger di seluruh jagat raya, wkwkwk... Dalam tulisan kali ini @bu kepengen sharing kepada sobat-sobit kaitannya dengan aplikasi kalkulator sederhana menggunakan bahasa pemrograman delphi. Buat kalian nih yang suka belajar pemrograman yang satu ini pasti gk tertarik buat baca artikel ini, tapi buat sobat-sobit blogger yang masih awam dengan pemrograman delphi, berikut @bu berikan latihan buat kalian semua. Berikut tutorial pembuatan aplikasi kalkulatornya:

KOMPONEN YANG DIGUNAKAN:
1). Form (1 buah)
    - Name: Form 1
      Caption: Kalkulatorku
2). Label (2 buah)
    - Name: Label1
      Caption: Angka pertama
    - Name: Label2
      Caption: Angka kedua
3). Edit (3 buah)
    - Name: Edit1
      Text: (kosongkan)
    - Name: Edit2
      Text: (kosongkan)
    - Name: Edit3
      Text: (kosongkan)
      Enabled: False
4). Button (4 buah)
    - Name: Button1
      Caption: +
    - Name: Button2
      Caption: -
    - Name: Button3
      Caption: *
    - Name: Button4
      Caption: /

RANCANGAN FORM:



SINTAKS BUTTON1 (Double Klik Pada Button1) :

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      Edit3.Text := floattostr(strtofloat(Edit1.Text) + strtofloat(Edit2.Text));
    end;


SINTAKS BUTTON2 (Double Klik Pada Button2) :

    procedure TForm1.Button2Click(Sender: TObject);
    begin
      Edit3.Text := floattostr(strtofloat(Edit1.Text) - strtofloat(Edit2.Text));
    end;


SINTAKS BUTTON3 (Double Klik Pada Button3) :

    procedure TForm1.Button3Click(Sender: TObject);
    begin
      Edit3.Text := floattostr(strtofloat(Edit1.Text) * strtofloat(Edit2.Text));
    end;


SINTAKS BUTTON4 (Double Klik Pada Button4) :

    procedure TForm1.Button4Click(Sender: TObject);
    begin
      Edit3.Text := floattostr(strtofloat(Edit1.Text) / strtofloat(Edit2.Text));
    end;

Sekian sobat blogger :). Semoga bermanfaat buat kalian semua, blog ini semata-mata sebagai sarana buat saya berbagi. Mengenai rancangan formnya terserah buat sobat-sobit aja gimana cara kreasinya, kalau cantik cara merancangnya tdk menutup kemungkinan ada yang mau beli, wkwkwk.

See you dalam update berikutnya...

Oldest
You are reading the latest post
back to top