Cara membuat program konversi mata uang dengan delphi 7.0

Robby Yuli Endra | 1 comment
Cara membuat program konversi mata uang dengan delphi 7.0 - Yang sedang belajar delphi, mungkin yang baru memulai beljar delphi 7.0, delphi 7.0 merupakan bahasa pemograman yang karakteristiknya GUI (Graphical user interface), bahasanya mirip dengan pascal yang jalan di dos, pada artikel ini saya akan membuat bagaimana cara membuat konversi mata uang denga delphi 7.0, program sederhana sich, tapi mungkin bisa membantu bagi para pemula.

Cara membuat program konversi mata uang dengan delphi 7.0

  1. Yang pertama buka delphi 7.0 anda dan buat designya kira-kira seperti dibawah ini

     2. Selanjutnya Klik Button konversi dan ketikan source code dibawah ini

procedure TForm1.Button1Click(Sender: TObject);
var rp,dl,ps,rm : Real; //Deklarasi variabel
begin
rp:=StrToFloat(edrupiah.Text); //konvert dari string ke float
dl:= rp / 9000 ;                        //diasumsikan 1 dolar = 9000
ps:= rp /15000;                      
//diasumsikan 1 poundsterling = 15000
rm:= rp / 2500;                       //diasumsikan 1 ringgit malaysia = 2500

Eddolar.Text:=FloatToStr(dl);
EdPond.Text:=FloatToStr(ps);
EdMalaysia.Text:=FloatToStr(rm);

end;

end
      3. Klik button Reset untuk memberishkan layar, cara membuatnya ketik source code dibawah ini :
procedure TForm1.Button2Click(Sender: TObject);
begin
edrupiah.Text:=''; //edrupiah,eddolar,edpond,edmalaysia adalah name dari edit anda bs ganti
Eddolar.Text:='';
EdPond.Text:='';
EdMalaysia.Text:='';
end;

end. 
Keterangan : Text Warna Merah adalah keterangan jangan diketik, Selamat mencoba dan Smoga bermanfaat.

Labels: 

Author: Robby Yuli Endra

Date: Kamis, Mei 03, 2012

1 comment  | Leave a comment

1 comment to "Cara membuat program konversi mata uang dengan delphi 7.0"

Cyber-WarKaD 26 Februari 2013 00.43
Om.. tau rumus delphi untuk turunan atau integral gak...??

Poskan Komentar

Silahkan isikan komentar sesuai dengan isi artikel, Jangan memasukan link karena akan dihapus oleh spamfilter karena dianggap Spam. Penulis menerima Saran dan Kritik yang membangun bukan sara ras dan yang lainnya
Kalau ada kritik dan saran bisa kirim ke Email : capt.obbies@gmail.com Terima Kasih sudah berkunjung di blog ini..Salam Istimewa dari www.robbyyuliendra.com