konsep dan aplikasi pemrograman menggunakan borland c__ ...

A = StrToInt(Edit1->Text);
t = StrToInt(Edit2->Text);
Luas = 0.5 * A * t;
Edit3->Text = Luas;
}
//---------------------------------------------------------------------------
void __fastcall TFUtama::FormCreate(TObject *Sender)
{
Edit1->Clear();
Edit2->Clear();
Edit3->Clear();
}
//---------------------------------------------------------------------------
Isi dari file header utama.h adalah sebagai berikut:
//---------------------------------------------------------------------------
#ifndef utamaH
#define utamaH
//---------------------------------------------------------------------------
#include
#include
#include
#include
//---------------------------------------------------------------------------
class TFUtama : public TForm
{
__published: // IDE-managed Components
TLabel *Label1;
TLabel *Label2;
TLabel *Label3;
TLabel *Label4;
TButton *Button1;
TEdit *Edit1;
TEdit *Edit2;
25