Sebelumnya membuat aplikasi ubah text .
Sekarang akan membuat aplikasi mencari total harga, yang tentunya dapat memudahkan penjualan barang hanya dengan mengisikan harga dan berapa unit maka akan ketemu hasil berarti logikanya Harga*Unit=TotalHasil
Nillai String berupa huruf atau text, Nilai Interger berupa angka int, berukuran 4 byte, jangkauan -2,147,483,648 hingga 2,147,483,647
Untuk "//" itu adalah komentar jadi tidak di execute, gunanya untuk membuat kode lebih mudah dimengerti jika dibaca programmer lain
Sekarang akan membuat aplikasi mencari total harga, yang tentunya dapat memudahkan penjualan barang hanya dengan mengisikan harga dan berapa unit maka akan ketemu hasil berarti logikanya Harga*Unit=TotalHasil
- Buatlah form1 sbb: (Langsung saja karena sudah dijelaskan di post sebelumnya)
- Pada Button1 / "&Hitung" , isikan kode sbb :
void __fastcall TForm1::Button1Click(TObject *Sender) { int Harga,Unit,Total; Harga=StrToInt(Edit1->Text); //StrToInt adalah mengonvert String/text ke Interger/Angka Unit=StrToInt(Edit2->Text); //Edit1 & Edit2 itu adalah nama objek Total=Harga*Unit; //Mengalikan harga dan unit yang telah diubah ke Angka/Interger Edit3->Text=IntToStr(Total); //IntToStr adalah mengonvert Interger/text ke String/Angka }
Nillai String berupa huruf atau text, Nilai Interger berupa angka int, berukuran 4 byte, jangkauan -2,147,483,648 hingga 2,147,483,647
Untuk "//" itu adalah komentar jadi tidak di execute, gunanya untuk membuat kode lebih mudah dimengerti jika dibaca programmer lain
- Setelah itu kita jalankan maka sbb :
Tidak ada komentar:
Posting Komentar