Rumus Hitung Nilai Pada Delphi

hitung Untuk Tambah
Nilai1 :=StrToInt(edit1.text);
Nilai2 :=StrToInt(edit1.Text);
Hasil :=nilai1+nilai2;
edit3.text :=FloatToStr(hasil);
hitung Untuk kurang
Hasil :=nilai1 - nilai2;
edit3.text :=FloatToStr(hasil);
hitung untuk bagi
Hasil :=nilai1 / nilai2;
edit3.text :=FloatToStr(hasil);
hitung untuk Kali
Hasil :=nilai1 * nilai2;
edit3.text :=FloatToStr(hasil);

Blog Baru Coy