Belajar pemrograman C++ Arsip 3.1 - Membuat aplikasi Sederhana ( Mencari total harga barang dengan terdata )

Setelah membuat aplikasi mencari total harga pada arsip 3.
Kita lanjutkan masih sama 3.1 dengan terdata maksutnya data barangnya sudah ada dan setiap data berbeda harga. misal barang bakso=5000,es=1000,krupuk=200, tapi kita langsung saja dengan menggunakan Combo box. pengin tahu caranya nih lihat  :-s

1. Buat Form1 sbb:

 

Nih tata letaknya terserah namanya mau label berapa yang penting kreatif Label3 & Label 5 akan saya bikin hasilnya *ganti nama label pada properties ->name: *Caption adalah judul bukan nama

2.  Pada form1 / bagian tubuh double klik dan isikan kode :

void __fastcall TForm1::FormCreate(TObject *Sender)
{
ComboBox1->Items->Add("Bakso");
ComboBox1->Items->Add("Siomay");
ComboBox1->Items->Add("Krupuk");
ComboBox1->Items->Add("ES");
ComboBox1->Items->Add("Mie Ayam");
ComboBox1->ItemIndex=0; //item index tidak ada jadi diisi dgn item pertama

for (int i=1;i<=100;i++){ // i=1 selama i<=100 maka i selalu di tambah 1
ComboBox2->Items->Add(IntToStr(i));
ComboBox2->ItemIndex=0;
}
} 

3. Pada ComboBox1 / Nama Barang isikan kode :

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
if(ComboBox1->Text=="Bakso"){ //Jika ComboBox1 berisi Bakso maka
Label3->Caption="8000";       //Caption Label 3 ganti harganya
}
else if(ComboBox1->Text=="Siomay"){
Label3->Caption="2000";
}
else if(ComboBox1->Text=="Krupuk"){
Label3->Caption="200";
}
else if(ComboBox1->Text=="ES"){
Label3->Caption="1000";
}
else if(ComboBox1->Text=="Mie Ayam"){
Label3->Caption="5000";
}
}  

4. Pada ComboBox2 / Unit isikan kode berikut :

void __fastcall TForm1::ComboBox2Change(TObject *Sender)

{

int Harga,Unit,Total;

 Harga=StrToInt(Label3->Caption);

 Unit=StrToInt(ComboBox2->Text);

 Total=Harga*Unit;

 Label5->Caption=IntToStr(Total);

} 

5. Maka kita jalankan akan jadi seperti ini :

 Lihat Semua  C++ Builder | Lihat arsip selanjutnya