oldcard.h

停车场用

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

#ifndef CardH
#define CardH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <Grids.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include <Db.hpp>
#include <DBGrids.hpp>
#include <DBCtrls.hpp>


//---------------------------------------------------------------------------
class TCardForm : public TForm
{
__published:	// IDE-managed Components
  TPanel *m_ReadPanel;
        TGroupBox *m_ReadCardGBox;
  TLabel *m_CRLabel;
  TLabel *m_ReaderLabel;
  TLabel *m_CardTypeLabel;
  TLabel *m_CardNoLabel;
  TComboBox *m_CRCoBox;
  TComboBox *m_ReaderCoBox;
  TComboBox *m_CardTypeCoBox;
  TEdit *m_CardNoEdit;
        TUpDown *m_CardNoUpDown;
  TDBGrid *m_TextDBGrid;
  TDataSource *m_CardDataSource;
        TBitBtn *m_BeginBut;
        TBitBtn *m_PauseBut;
        TPanel *m_TitlePanel;
        TLabel *m_TextLabel;
        TLabel *m_RecNumLabel;
        TPanel *m_RecNumPanel;
        TPanel *m_ButPanel;
        TBitBtn *m_CloseBut;
        TBitBtn *m_AddBut;
        TBitBtn *m_DelBut;
        TBitBtn *m_EditBut;
        TBitBtn *m_InqBut;
        TDBNavigator *m_TextDBNavigator;
        TLabel *m_CardFormatLabel;
        TComboBox *m_CardFormatCoBox;
  void __fastcall FormResize(TObject *Sender);
  void __fastcall m_TextDBGridDrawColumnCell(TObject *Sender,
          const TRect &Rect, int DataCol, TColumn *Column,
          TGridDrawState State);
        void __fastcall m_CloseButClick(TObject *Sender);
        void __fastcall m_AddButClick(TObject *Sender);
        void __fastcall m_DelButClick(TObject *Sender);
  void __fastcall m_CardFormatCoBoxChange(TObject *Sender);
        void __fastcall m_EditButClick(TObject *Sender);
  void __fastcall m_TextDBGridTitleClick(TColumn *Column);
        void __fastcall m_CRCoBoxChange(TObject *Sender);
        void __fastcall m_BeginButClick(TObject *Sender);
        void __fastcall m_PauseButClick(TObject *Sender);
        void __fastcall FormDestroy(TObject *Sender);
        void __fastcall m_InqButClick(TObject *Sender);
        void __fastcall m_CardDataSourceDataChange(TObject *Sender,
          TField *Field);
private:	// User declarations
public:		// User declarations
  BYTE m_nHex;
  int m_nDone;
  __fastcall TCardForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
//设置感应卡片
extern int SetCardData(TObject *Owner);
//查询感应卡片
extern int InquireCardData(TObject *Owner);
//---------------------------------------------------------------------------
#endif