yhdl.h

来自「营业用电管理系统(网络版)是本公司推出的新一代软件产品」· C头文件 代码 · 共 59 行

H
59
字号
//---------------------------------------------------------------------------

#ifndef YHDLH
#define YHDLH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <ScktComp.hpp>
//---------------------------------------------------------------------------
class TCLogin : public TForm
{
__published:	// IDE-managed Components
        TLabel *Label1;
        TPanel *Panel1;
        TLabel *Label2;
        TLabel *Label3;
        TBitBtn *BitBtn1;
        TBitBtn *BitBtn2;
        TBitBtn *BitBtn3;
        TDateTimePicker *DateTimePicker1;
        TComboBox *ComboBox1;
        TEdit *Edit1;
        TClientSocket *ClientSocket1;
        TStatusBar *StatusBar1;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall BitBtn2Click(TObject *Sender);
        void __fastcall BitBtn3Click(TObject *Sender);
        void __fastcall BitBtn1Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall FormKeyPress(TObject *Sender, char &Key);
        void __fastcall FormActivate(TObject *Sender);
        void __fastcall ClientSocket1Error(TObject *Sender,
          TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
          int &ErrorCode);
        void __fastcall ClientSocket1Read(TObject *Sender,
          TCustomWinSocket *Socket);
        void __fastcall ClientSocket1Connecting(TObject *Sender,
          TCustomWinSocket *Socket);
private:	// User declarations
public:		// User declarations
        AnsiString gzzname;
        AnsiString kzqx;
        AnsiString ywrq;
        int dlok;
        AnsiString servername;
//        AnsiString Server;
         AnsiString czyname;
        __fastcall TCLogin(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TCLogin *CLogin;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?