📄 bjls.h
字号:
//---------------------------------------------------------------------------
#ifndef BjLsH
#define BjLsH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <Db.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include "ColorButton.hpp"
#include <Mask.hpp>
//---------------------------------------------------------------------------
class TBjLsForm : public TForm
{
__published: // IDE-managed Components
TADOTable *ADOTable1;
TDataSource *DataSource1;
TDataSource *DataSource2;
TGroupBox *GroupBox2;
TADOQuery *ADOQuery1;
TDataSource *DataSource4;
TDBGrid *DBGrid1;
TWideStringField *ADOQuery1pjbh;
TWideStringField *ADOQuery1flbh;
TWideStringField *ADOQuery1pzbh;
TWideStringField *ADOQuery1mc;
TBCDField *ADOQuery1bxdj;
TBCDField *ADOQuery1lsdj;
TIntegerField *ADOQuery1kcsl;
TIntegerField *ADOQuery1wjsl;
TWideStringField *ADOQuery1bz;
TGroupBox *GroupBox4;
TLabel *Label6;
TLabel *Label7;
TEdit *Edit1;
TButton *Button1;
TButton *Button2;
TADOQuery *ADOQuerytmp;
TLabel *Label9;
TEdit *Edit4;
TADOQuery *ADOQuery2;
TLabel *Label1;
TDBLookupComboBox *DBLookupComboBox1;
TLabel *Label2;
TDBLookupComboBox *DBLookupComboBox2;
TMaskEdit *MaskEdit1;
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
void __fastcall FormCreate(TObject *Sender);
void __fastcall DBLookupComboBox1Click(TObject *Sender);
void __fastcall Button1Click(TObject *Sender);
void __fastcall ADOQuery1AfterPost(TDataSet *DataSet);
void __fastcall Button2Click(TObject *Sender);
void __fastcall DBLookupComboBox2Click(TObject *Sender);
void __fastcall DataSource4DataChange(TObject *Sender,
TField *Field);
void __fastcall MaskEdit1Change(TObject *Sender);
void __fastcall DataSource4StateChange(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TBjLsForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TBjLsForm *BjLsForm;
//---------------------------------------------------------------------------
#endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -