result.h

关于书籍《Borland c++Builder工程实践》的源代码

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

#ifndef resultH
#define resultH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <DB.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <DBTables.hpp>
#include <Grids.hpp>
#include <Mask.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TResultForm : public TForm
{
__published:	// IDE-managed Components
    TDataSource *DataSource1;
    TQuery *Query1;
    TStringField *Query1ACCNO;
    TStringField *Query1NAME;
    TStringField *Query1SECTION_OFFICE;
    TStringField *Query1SERVICE_ITEM;
    TDateTimeField *Query1SERVICE_DATE;
    TFloatField *Query1COST;
    TLabel *Label1;
    TLabel *Label2;
    TDatabase *Database1;
    TLabel *Label3;
    TLabel *Label4;
    TLabel *Label5;
    TLabel *Label6;
    TDBEdit *accounts;
    TDBEdit *name;
    TDBEdit *cost;
    TDBEdit *office;
    TDBEdit *service;
    TDBEdit *date;
    TButton *Button2;
    TLabel *Label7;
    TButton *Button1;
    TTimer *Timer1;
    void __fastcall Timer1Timer(TObject *Sender);
    void __fastcall FormShow(TObject *Sender);
private:	// User declarations
    AnsiString AccountsNo,PatientName;
    bool AbortFlag;
    int InputError;
public:		// User declarations
    __fastcall TResultForm(TComponent* Owner);
    void  __fastcall SetAccNo(AnsiString str);
    void  __fastcall SetName(AnsiString str);
    bool GetAbortFlag();
    bool GetInputError();
};
//---------------------------------------------------------------------------
extern PACKAGE TResultForm *ResultForm;
//---------------------------------------------------------------------------
#endif