📄 dlgquannengxiangmu.h
字号:
//----------------------------------------------------------------------------
#ifndef dlgquannengxiangmuH
#define dlgquannengxiangmuH
//----------------------------------------------------------------------------
#include <vcl\System.hpp>
#include <vcl\Windows.hpp>
#include <vcl\SysUtils.hpp>
#include <vcl\Classes.hpp>
#include <vcl\Graphics.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include <vcl\Controls.hpp>
#include <vcl\Buttons.hpp>
#include <vcl\ExtCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <Db.hpp>
#include <ADODB.hpp>
//----------------------------------------------------------------------------
class Tquannengxiangmu : public TForm
{
__published:
TGroupBox *GroupBox1;
TButton *OKBtn;
TButton *CancelBtn;
TDBGrid *grid;
TLabel *Label1;
TMemo *bz;
TLabel *Label2;
TEdit *lbfzmc;
TLabel *Label3;
TComboBox *yxxm;
TSpeedButton *SpeedButton1;
TSpeedButton *SpeedButton2;
TLabel *Label4;
TEdit *dxxmmc;
TLabel *Label5;
TEdit *dxxmzt;
TBitBtn *BitBtn10;
TBitBtn *BitBtn17;
TBitBtn *BitBtn16;
TBitBtn *BitBtn11;
TBitBtn *BitBtn14;
TBitBtn *BitBtn12;
TLabel *Label7;
TListBox *kxxm;
TLabel *Label22;
TComboBox *gs;
TLabel *Label6;
TEdit *bssj;
void __fastcall SpeedButton1Click(TObject *Sender);
void __fastcall SpeedButton2Click(TObject *Sender);
void __fastcall yxxmChange(TObject *Sender);
void __fastcall BitBtn14Click(TObject *Sender);
void __fastcall BitBtn1Click(TObject *Sender);
void __fastcall BitBtn12Click(TObject *Sender);
private:
AnsiString id;
public:
TADOQuery *m_query;
TADOConnection *m_con;
TStringList *list_zxmbh,*list_zxmmc;
TStringList *list_dxxmmc,*list_dxxmzt;
TStringList *list_xmbh,*list_lbfzbh,*list_lbfzmc,*list_dxbssj;
TStringList *list_temp;
AnsiString tbdxxmmc,tbdxxmzt,tbdxcnmc,tbdxxmbh,tbdxbssj,tbgs;
virtual __fastcall Tquannengxiangmu(TComponent* AOwner);
void __fastcall setvalue( TDataSet *dataset);
void __fastcall refresh();
void execute(AnsiString sql);
bool __fastcall valide(int i = 1);
};
//----------------------------------------------------------------------------
extern PACKAGE Tquannengxiangmu *quannengxiangmu;
//----------------------------------------------------------------------------
#endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -