u4_7_1.cpp

《C++ Builder 5程序设计——基础教学篇》程序源代码2.

//------------  u4_7_1  ---------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "u4_7_1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tf4_7_1 *f4_7_1;
//---------------------------------------------------------------------------
__fastcall Tf4_7_1::Tf4_7_1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall Tf4_7_1::btnOKClick(TObject *Sender)
{
  edtMoney->Text=FloatToStr(StrToFloat(edtPrice->Text)*StrToFloat(edtNum->Text));
}
//---------------------------------------------------------------------------
void __fastcall Tf4_7_1::btnClearClick(TObject *Sender)
{
  edtNum->Text="";
  edtMoney->Text="";
}
//---------------------------------------------------------------------------

void __fastcall Tf4_7_1::btnEndClick(TObject *Sender)
{
  Close();    
}
//---------------------------------------------------------------------------