cpzsetup.h

数据采集

//---------------------------------------------------------------------------
#ifndef cpzsetupH
#define cpzsetupH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ToolWin.hpp>
#include <Menus.hpp>
#include <Dialogs.hpp>
#include <Grids.hpp>
#include <NMSTRM.hpp>
#include <Psock.hpp>

//---------------------------------------------------------------------------
class Tform_cpzsetup : public TForm
{
__published:	// IDE-managed Components
        TPageControl *PageControl1;
        TTabSheet *T_data;
        TMemo *Memo1;
        TMainMenu *MainMenu1;
        TMenuItem *Exit;
        TMenuItem *print;
        TOpenDialog *OpenDialog1;
        TMenuItem *open;
        TTabSheet *T_js_pzcpzl;
        TButton *js;
        TLabel *l_pzc;
        TLabel *l_pzl_q;
        TLabel *l_pzl_h;
        TEdit *e_bzz;
        TLabel *Label11;
        TLabel *Label13;
        TTabSheet *T_jsnew;
        TStringGrid *sg_jsnew;
        TButton *b_jsnew;
        TLabel *Label21;
        TLabel *Label22;
        TEdit *e_cols;
        TLabel *Label19;
        TLabel *Label20;
        TEdit *e_long;
        TLabel *Label23;
        TEdit *e_zxj;
        TLabel *Label25;
        TEdit *e_pzc;
        TLabel *lll;
        TLabel *Label28;
        TEdit *e_pzlq;
        TLabel *Label29;
        TEdit *e_pzlh;
        TLabel *Label30;
        TEdit *e_bzznew;
        TStringGrid *sg_jsnew2;
        TLabel *Label1;
        TLabel *Label7;
        TLabel *Label8;
        TLabel *Label9;
        TLabel *Label10;
        TEdit *E_pzc4;
        TEdit *E_pzc3;
        TEdit *E_pzc2;
        TEdit *E_pzc1;
        TEdit *E_pzc0;
        TEdit *E_pzl_h0;
        TEdit *E_pzl_h1;
        TEdit *E_pzl_h2;
        TEdit *E_pzl_h3;
        TEdit *E_pzl_h4;
        TEdit *E_pzl_q4;
        TEdit *E_pzl_q3;
        TEdit *E_pzl_q2;
        TEdit *E_pzl_q1;
        TEdit *E_pzl_q0;
        TButton *save_cpzsetup;
        TEdit *E_cnt;
        TLabel *Label12;
        TLabel *Label14;
        TEdit *Edit1;
        TEdit *Edit2;
        TEdit *Edit3;
        TEdit *Edit4;
        TEdit *Edit5;
        TEdit *Edit10;
        TEdit *Edit9;
        TEdit *Edit8;
        TEdit *Edit7;
        TEdit *Edit6;
        TButton *send_setup;
        TNMStrm *NMStrm1;
        TNMStrmServ *NMStrmServ1;
        TEdit *e_host;
        TCheckBox *CheckBox1;
        TCheckBox *CheckBox2;
        TCheckBox *CheckBox3;
        TCheckBox *CheckBox4;
        TCheckBox *CheckBox5;
        TLabel *Label2;
        TMemo *memo_status;
        TCheckBox *CheckBox6;
        TLabel *Label3;
        TButton *Button3;
        TEdit *Edit11;
        TCheckBox *cb_by_wei;
        TTabSheet *TabSheet1;
        TStringGrid *StringGrid1;
        TLabel *Label4;
        TButton *save_bd2;
        void __fastcall save_cpzsetupClick(TObject *Sender);
        void __fastcall ExitClick(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall printClick(TObject *Sender);
        void __fastcall openClick(TObject *Sender);
        void __fastcall T_js_pzcpzlShow(TObject *Sender);
        void __fastcall jsClick(TObject *Sender);
        void __fastcall b_jsnewClick(TObject *Sender);
        void __fastcall e_colsExit(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall send_setupClick(TObject *Sender);
        void __fastcall NMStrmServ1MSG(TComponent *Sender,
          const AnsiString sFrom, TStream *strm);
        void __fastcall NMStrm1Status(TComponent *Sender,
          AnsiString Status);
        void __fastcall NMStrm1Connect(TObject *Sender);
        void __fastcall NMStrm1ConnectionFailed(TObject *Sender);
        void __fastcall NMStrm1Disconnect(TObject *Sender);
        void __fastcall NMStrm1HostResolved(TComponent *Sender);
        void __fastcall NMStrm1InvalidHost(bool &Handled);
        void __fastcall NMStrm1MessageSent(TObject *Sender);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall cb_by_weiClick(TObject *Sender);
        void __fastcall TabSheet1Show(TObject *Sender);
        void __fastcall save_bd2Click(TObject *Sender);
private:	// User declarations
    static const int LIE=9; // 列数
    static const int HAN=4; // 行数
    TList *ll; //list of list for edit
    TList *l;  // list of edit
    TList *ll2; //list of list  for label
    TList *l2;  // list of label
    TList *ll3; //list of list  for edit_dltx
    TList *l3;  // list of edit_dltx

    int x[LIE][HAN];
    int y[LIE][HAN];
    int m[LIE][HAN];
    int dlt_x[LIE][HAN];


public:		// User declarations
        __fastcall Tform_cpzsetup(TComponent* Owner);
        void __fastcall Tform_cpzsetup::show_cpzdata(AnsiString file);
        void __fastcall Tform_cpzsetup::get_mxy(int& m,int& x,int& y,String s);
        void __fastcall Tform_cpzsetup::create_edit_label();
        void __fastcall Tform_cpzsetup::delete_edit_label();
        void __fastcall Tform_cpzsetup::send_cpzsetup(const String& host,const String& from);
        void __fastcall Tform_cpzsetup::show_edit6_10(bool visible);
};
//---------------------------------------------------------------------------
extern PACKAGE Tform_cpzsetup *form_cpzsetup;
//---------------------------------------------------------------------------
#endif