unit1.h

来自「详细对一般字符串表达式解析」· C头文件 代码 · 共 53 行

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
    TPanel *Panel1;
    TListView *ListView2;
    TListView *ListView1;
    TSplitter *Splitter1;
    TPanel *Panel2;
    TButton *Button2;
    TComboBox *cbxCaption;
    TListView *lsvData;
    TButton *Button1;
    TButton *Button3;
    TButton *Button4;
    TEdit *edtRsltCaption;
    TButton *Button5;
    void __fastcall Button2Click(TObject *Sender);
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall FormDestroy(TObject *Sender);
    void __fastcall Button1Click(TObject *Sender);
    void __fastcall Button3Click(TObject *Sender);
    void __fastcall Button4Click(TObject *Sender);
    void __fastcall Button5Click(TObject *Sender);
private:
    TStringList *pTitleList;
    void __fastcall DataToListView(TListView *LstView,AnsiString XlsName);
    void __fastcall GetLsvTitle(TStringList *pTitleList,TListView *LstView);
    void __fastcall AddTitle(TListView *LstView,AnsiString Title);
    int __fastcall Caculate(int DataA,int DataB,AnsiString CacStr);
public:
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif