latihan pertama

Latih-1 :

Buatlah program Latih-1 dengan mengikuti petunjuk berikut :

1. Aktifkan software C++ Builder dan buat aplikasi baru dengan memilih menu File, New application.
2. Rancanglah Form Output program seperti gambar di bawah ini :



-Taruh 1 buah komponen Panel pada Form
-Taruh 3 buah komponen Label pada Form
-Taruh 3 buah komponen Edit pada Form
-Taruh 3 buah komponen Button pada Form

3. ubah properties komponen


4. Klik ganda pada area form1 yang kosong, lalu tekan tombol pageup, kemudian tambahkan perintah ini : float Hasil;
dibawah kata :
#pragma resource "*.dfm"
TForm1 *Form1;
// <- ketik di sini
5. Ketik perintah berikut pada bagian halaman Events pada jendela object inspector untuk objek :

- Form1 : klik ganda tempat kosong disamping kanan event OnCreate
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Panel1->Caption="Tanggal : "+DateToStr(Date()); // cukup ini yang diketik
}
//---------------------------------------------------------------------------

- Edit1, Edit2 : klik ganda tempat kosong disamping kanan event OnKeyPress
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key==13)
PostMessage(Handle,WM_NEXTDLGCTL,0,0);
}
//---------------------------------------------------------------------------

- Edit3 : klik ganda tempat kosong disamping kanan event OnEnter
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit3Enter(TObject *Sender)
{
PostMessage(Handle,WM_NEXTDLGCTL,0,0);
}
//---------------------------------------------------------------------------

- Button1 : klik ganda tempat kosong disamping kanan event OnClick
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Hasil=StrToFloat(Edit1->Text)+StrToFloat(Edit2->Text);
Edit3->Text=FloatToStr(Hasil);
}
//---------------------------------------------------------------------------

- Button2 : klik ganda tempat kosong disamping kanan event OnClick
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Edit1->Text=" ";
Edit2->Text=" ";
Edit3->Text=" ";
Edit1->SetFocus();
}
//---------------------------------------------------------------------------

- Button3 : klik ganda tempat kosong disamping kanan event OnClick
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Close(); //Application->Terminate();
}
//---------------------------------------------------------------------------

6. Run program dengan menekan tombol F9 atau tekan icon ► pada speedbar.
7. Contoh hasil running program :



Tugas-1 :
Buatlah program aplikasi kalkulator dengan ketentuan sebagai berikut :
Group pemasukan data digunakan untuk menginput bilangan yang akan diproses dalam program kalkulator.
Group Operator digunakan untuk memilih bentuk operasi yang akan digunakan, apakah : + (penjumlahan), - (pengurangan), * (perkalian), / (pembagian), ce (reset ke nol), = (menampilkan hasil).
Group Output digunakan untuk menampilkan hasil proses dari group pemasukan data
Tombol Keluar digunakan untuk keluar dari program.