TUTORIAL DELPHI : MEMBUAT FORM PERHITUNGAN / KALKULASI ANGKA BULAT DAN PECAHAN

18 Apr

Visual Delphi dikenal sebagai bahasa pemrograman yang terstruktur dan konsisten terhadap kaedah kode program , sehingga jika suatu kode program salah sedikit maka akan dianggap salah dan jika sudah benar kemungkinan salah dalam pengeksekusian tidak ada. Khusus untuk kode program perhitungan angka bulat dan pecahan, V.Delphi mempunyai perbedaan yang mencolok dengan bahasa pemrogrman lain, misalnya VB dan Foxpro, Delphi lebih konsisten namun perlu pemahaman lebih mendalam

Hal hal yang perlu di perhatikan di V.Delphi jika ingin membuat program perhitungan :

1. V.Delphi menganggap semua masukan angka ke dalam teks masukan di form sebagai karakter (huruf, tanda baca)

2. V.Delphi tidak bisa menampilkan keluaran / output dalam bentuk angka. Semua ditampilkan dalam bentuk karakter.

Sehingga programmer tugasnya adalah memanipulasi agar semua masukan dan keluaran dianggap sebagai karakter, meskipun kenyataannya dalam bentuk angka. Perhatikan gambar di bawah ini:

gb3

Form diatas adalah suatu proses penjumlahan dengan rumus B+C=A, sehingga ada dua masukan yaitu B dan C, sedangkan A merupakan hasil penjumlahan yang akan muncul jika di masukkan nilai B dan C. Jika user memasukkan angka ke dalam B dan C (misal B = 7 dan C= 9), maka kedua angka tersebut dianggap sebagai karakter sehingga program akan error jika di eksekusi.

Untuk memanipulasi kode program diatas, maka langkahnya :

1. Ubahlah masukan B dan C dari string menjadi angka / integer dengan format StrToInt

2. Setalah di ubah lakukan proses penjumlahan

3. Setelah ketemu hasilnya, maka hasil penjumlahan diubah lagi dari Integer ke String dengan format IntToStr

Dari contoh di di atas, terlebih dahulu teks masukan di beri identitas, caranya menseting pada object inspector , yaitu:

A

Name = Ahasil

Text = (kosongkan)

B

Name = Bmasukan

Text = (kosongkan)

C

Name = Cmasukan

Text = (kosongkan)

Untuk membuat kode program klik dua kali pada tombol = Adapun kode programnya adalah :

begin

Ahasil.text := IntToStr(StrToInt(Bmasukan.text)+StrToInt(Cmasukan.text));

End;

Selain itu kita dapat membuat kode program dengan format yang beda, yaitu dengan memecah perbagian sehingga lebih mudah di pahami,yaitu :

Var

A, B, C : integer;

Begin

B := StrToInt(Bmasukan.text);

C := StrToInt(Cmasukan.text);

A := B + C;

Ahasil.text := IntToStr(A);

End;

Untuk operasi penjumlahan, pengurangan dan perkalian menggunakan integer sehingga prosesnya seperti diatas, namun jika operasi pembagian menggunakan format tipe data real/pecahan sehingga menjadi

Var

A, B, C : real;

Begin

B := StrToFloat(Bmasukan.text);

C := StrToFloat (Cmasukan.text);

A := B / C;

Ahasil.text := FloatToStr(A);

End;

Selanjutnya coba jalankan form tersebut dan masukkan angkanya, selamat mencoba (ngangkasi)

3 Tanggapan to “TUTORIAL DELPHI : MEMBUAT FORM PERHITUNGAN / KALKULASI ANGKA BULAT DAN PECAHAN”

  1. Wisnu Mei 20, 2009 pada 12:54 pm #

    Ok Makasih atas Share Nya OM….:D

  2. anton Juni 17, 2009 pada 6:34 am #

    klu bleh d kirimin tutorial pengoperasian delphi yang berdasar acces…trims

  3. Smithd960 Agustus 9, 2014 pada 4:23 pm #

    As a Newbie, I am continuously searching online for articles that can aid me. Thank you bfcggkdffffefcbe

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: