About

Jumat, 14 Oktober 2011

Dua Angka Dibelakang KOma

membuat dua angka di belakang koma dengan delphi.
langkah pertama:
buatlah form dengan delphi, setelah itu buat box(edit1.text) dan button proses seperti pada gambar :
langkah kedua:
masukan code berikut pada button proses

procedure TForm1.prosesClick(Sender: TObject);
var nilai:real;
begin
nilai:=strtofloat(edit1.Text);
edit1.Text:=formatfloat('#,##0.00',nilai);
end;

keterangan:
Tulisan berwarna orange dan merah dapat diganti sesuai dengan apa yang sedang anda buat.


langkah ketiga:
pilih Run atau langsung tekan F9, setelah itu coba anda tuliskan angka pada box(contoh= 14.66666666666) lalu klik button proses. hasilnya=14.67



SEMOGA BERMANFAAT.....SEMOGA BERMANFAAT.....SEMOGA BERMANFAAT
.

5 komentar:

Unknown mengatakan...

terimakasih yah...ini syangat bermanfaat

Unknown mengatakan...

Thanks gan...
Sangat membantu...

Unknown mengatakan...
Komentar ini telah dihapus oleh pengarang.
Unknown mengatakan...

Makasih gan...

Unknown mengatakan...

kalau di lazarus bagaimana yah?

Posting Komentar