shoufei.cpp
来自「CBUILDER+SQL的实现」· C++ 代码 · 共 78 行
CPP
78 行
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "shoufei.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm6 *Form6;
//---------------------------------------------------------------------------
__fastcall TForm6::TForm6(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button2Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm6::LabeledEdit1Exit(TObject *Sender)
{
if(DBEdit1->Text=="")
{
MessageBox(Handle,"学号不能为空!","信息提示",MB_OK);
DBEdit1->SetFocus();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button1Click(TObject *Sender)
{
Table1->Post();
}
//---------------------------------------------------------------------------
void __fastcall TForm6::LabeledEdit6Exit(TObject *Sender)
{
float gongyufei = atof( LabeledEdit2->Text.c_str() );
float qitafei = atof( LabeledEdit4->Text.c_str() );
float xuefei = atof( LabeledEdit5->Text.c_str() );
float sum=gongyufei + qitafei + xuefei;
LabeledEdit6->Text=FloatToStr(sum);
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button3Click(TObject *Sender)
{ if(Table1->Active==false)
Table1->Open();
Table1->Append();
LabeledEdit2->Text="";
LabeledEdit4->Text="";
LabeledEdit5->Text="";
LabeledEdit6->Text="";
}
//---------------------------------------------------------------------------
void __fastcall TForm6::FormCreate(TObject *Sender)
{
Table1->Open();
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?