Arsip: Menambah dan Mengurangi Angka Pada EditText

 
user image
more 13 years ago

ranum

Saya mau nanya neeh, bagaimana buat button tambah (+) dan button minus (-) yang apabila ditekan button + maka akan menambah angka pada Edittext dan apabila ditekan button - maka akan mengurangi angka pada EditText??? :?
user image
more 13 years ago

ImanD

apa yg mo di kurang atw di tambah nech? data angkanya dari TEdit atw var Angka ?
user image
more 13 years ago

bank_redo

mas klo pas klik button trus nambah ato ngurangi di TEdit gmn? :(
user image
more 13 years ago

ImanD

sample simple

//proses penambahan
procedure TFrom1.ButtonTambah(Sender: TObject);
begin  
  EditHasil.Text:=FloatToStr(StrToFloat(EditNilai1.Text)+StrToFloat(EditNilai2.Text));
end;
//proses pengurangan
procedure TFrom1.ButtonKurang(Sender: TObject);
begin
  EditHasil.Text:=FloatToStr(StrToFloat(EditNilai1.Text)-StrToFloat(EditNilai2.Text));
end;
klo lebih enak manfaatkan TClassButoon untuk prosesnya contohnya memanfaatkan Tag-nya.
user image
more 13 years ago

saysansay

Nah lo...kok Tampilan Codingnta Cakep...Kaya di IDE Delphi 2007.dikau pake tag yg mana tuh mand ?
user image
more 13 years ago

ImanD

waduh ini si san jarang baca2 forum yg kemaren2 ya, saat peremajaan delphi-id kemaren,lumayan banyak yg baru lho, tag masih seperti doeloe.. [p a s]....coding delphi....[/ p a s] <-- replace#32 coba preview az bro, ga bayar ko! xixixiixi
more ...
  • Pages:
  • 1
Share to

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com