fieldtext.h

BCB 级联表的设计源代码。有需要的朋友可以看看。BCB这个东西不知道还有人用么。以往是我的最爱。

//---------------------------------------------------------------------------
#ifndef FieldTextH
#define FieldTextH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <DBCtrls.hpp>
//---------------------------------------------------------------------------
class TfrmFieldText : public TForm
{
__published:	// IDE-managed Components
        TDBMemo *dmmoFieldText;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall dmmoFieldTextKeyPress(TObject *Sender, char &Key);
private:	// User declarations
        bool IsEditing;

protected:
        AnsiString __fastcall GetDataFiled(void);
        TDataSource* __fastcall GetDataSource(void);
        void __fastcall SetDataField(AnsiString Value);
        void __fastcall SetDataSource(TDataSource* Value);

public:		// User declarations
        __fastcall TfrmFieldText(TComponent* Owner);

        __property AnsiString DataField = {read = GetDataFiled, write = SetDataField};
        __property TDataSource* DataSource = {read = GetDataSource, write = SetDataSource};
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmFieldText *frmFieldText;
//---------------------------------------------------------------------------
#endif