Program Body Mass Index dengan C++ Builder

Body Mass Index (BMI) adalah sebuah hasil perhitungan untuk menentukan apakah berat bada seseorang itu: kurus, normal, gemuk atau obesitas. BMI dapat dihitung dengan rumus:

BMI = BeratBadan / (TinggiBadan * TinggiBadan)

Sesudah BMI didapatkan, kita dapat memeriksa tingkat berat badan seseorang dengan perhitungan seperti dibawah ini:

Untuk Pria:

• < 17 :  Kurus
• antara 17 sampai 22:  Normal
• antara 23 sampai 27: Kegemukan
• lebih besar 27: Obesitas

Untuk Wanita:

• < 18 :  Kurus
• antara 18 sampai 24:  Normal
• antara 25 sampai 27: Kegemukan
• lebih besar 27: Obesitas

Langkah-langkah Pembuatan Aplikasi

1. Buatlah form seperti dibawah ini
   
   

   Tambahkan 2 TLabel, 2 TEdit, 1 TButton, 1 TRadioButton, 1 TMemo dengan property seperti dibawah ini

   
   

   Nama Class	Property Class
   TLabel	Name: label1 Caption: Tinggi Badan (cm)
   TLabel	Name: label2 Caption: Berat Badan (kg)
   TEdit	Name: edtTinggiBadan
   TEdit	Name: edtBeratBadan
   TRadioButton	Items: Pria, Wanita Columns: 2
   TButton	Caption: Kerjakan

2. Beri kode pada FormCreate sebagai berikut:
   
   

   FormCreate

   void __fastcall TForm1::FormCreate(TObject *Sender){edtTinggiBadan->Text = “0”; edtTinggiBadan->Text = “0”; mmKeterangan->Clear();}

3. Beri kode para tombol kerjakan sebagai berikut:
   
   

   edtKerjakanClick

   void __fastcall TForm1::edtKerjakanClick(TObject *Sender) {    double tinggiBadan, beratBadan, bmi;    String tampil;   tinggiBadan = edtTinggiBadan->Text.ToDouble() / 100;    beratBadan = edtBeratBadan->Text.ToDouble();   bmi = beratBadan / (tinggiBadan * tinggiBadan);   AnsiString str;    str.sprintf(“%.2f”, bmi);   if (bmi < 17) {      tampil = “Kurus”;    } else    if ( bmi >= 17 && bmi > 1) {      tampil = “Normal”;    } else    if (bmi >= 23 && bmi <= 27 )  {      tampil = “Kegemukan”;    } else    if (bmi > 27) {       tampil = “Obesitas”;    }   mmKeterangan->Lines->Add(    “BMI = ” + str + sLineBreak + tampil    ); }

4. Tulis pada OnEnter milik edtTinggiBadan kode program berikut:
   
   

   edtTinggiBadanEnter

   AnsiString Text = edtTinggiBadan->Text; int len = Text.Length(); PostMessage(edtTinggiBadan->Handle, EM_SETSEL, 0, len);

   
   Kode diatas dipergunakan agar isi dari edtTinggiBadan langsung disorot saat mendapat focus.
5. Tulis pada OnEnter milik edtBeratBadan kode program berikut:
   
   

   edtBeratBadanEnter

   AnsiString Text = edtBeratBadan->Text; int len = Text.Length(); PostMessage(edtBeratBadan->Handle, EM_SETSEL, 0, len);

   
   Kode diatas dipergunakan agar isi dari edtBeratBadan langsung disorot saat mendapat focus.

Program Body Mass Index dengan C++ Builder 2015-08-08T21:36:00-07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer