www.pudn.com > mfcdraw.zip > EDITBTN.HPP
// Borland C++ Builder // Copyright (c) 1995, 1998 by Borland International // All rights reserved // (DO NOT EDIT: machine generated header) 'EditBtn.pas' rev: 3.00 #ifndef EditBtnHPP #define EditBtnHPP #include#include #include #include #include #include #include #include #include #include #include #include #include #include //-- user supplied ----------------------------------------------------------- namespace Editbtn { //-- type declarations ------------------------------------------------------- typedef Buttons::TNumGlyphs TNumGlyphs; class DELPHICLASS TEditButton; class PASCALIMPLEMENTATION TEditButton : public Controls::TWinControl { typedef Controls::TWinControl inherited; private: Buttons::TBitBtn* FButton; Buttons::TBitBtn* FFocusedButton; Controls::TWinControl* FFocusControl; Classes::TNotifyEvent FOnClick; Buttons::TBitBtn* __fastcall CreateButton(void); Graphics::TBitmap* __fastcall GetGlyph(void); void __fastcall SetGlyph(Graphics::TBitmap* Value); Buttons::TNumGlyphs __fastcall GetNumGlyphs(void); void __fastcall SetNumGlyphs(Buttons::TNumGlyphs Value); void __fastcall BtnClick(System::TObject* Sender); void __fastcall BtnMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y); void __fastcall AdjustSize(int &W, int &H); HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message); protected: virtual void __fastcall Loaded(void); virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation ); public: __fastcall virtual TEditButton(Classes::TComponent* AOwner); virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight); __published: __property Align ; __property Ctl3D ; __property Graphics::TBitmap* Glyph = {read=GetGlyph, write=SetGlyph}; __property Buttons::TNumGlyphs NumGlyphs = {read=GetNumGlyphs, write=SetNumGlyphs, default=1}; __property DragCursor ; __property DragMode ; __property Enabled ; __property Controls::TWinControl* FocusControl = {read=FFocusControl, write=FFocusControl}; __property ParentCtl3D ; __property ParentShowHint ; __property PopupMenu ; __property ShowHint ; __property TabOrder ; __property TabStop ; __property Visible ; __property OnDragDrop ; __property OnDragOver ; __property OnEndDrag ; __property OnEnter ; __property OnExit ; __property OnStartDrag ; __property Classes::TNotifyEvent OnClick = {read=FOnClick, write=FOnClick}; public: /* TWinControl.CreateParented */ __fastcall TEditButton(HWND ParentWindow) : Controls::TWinControl( ParentWindow) { } /* TWinControl.Destroy */ __fastcall virtual ~TEditButton(void) { } }; class DELPHICLASS TEditBtn; class PASCALIMPLEMENTATION TEditBtn : public Stdctrls::TCustomEdit { typedef Stdctrls::TCustomEdit inherited; private: TEditButton* FButton; bool FEditorEnabled; Classes::TNotifyEvent FOnClickBtn; int __fastcall GetMinHeight(void); void __fastcall SetEditRect(void); HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message); HIDESBASE MESSAGE void __fastcall CMEnter(Messages::TWMNoParams &Message); HIDESBASE MESSAGE void __fastcall CMExit(Messages::TWMNoParams &Message); MESSAGE void __fastcall WMPaste(Messages::TWMNoParams &Message); MESSAGE void __fastcall WMCut(Messages::TWMNoParams &Message); protected: DYNAMIC void __fastcall GetChildren(Classes::TGetChildProc Proc, Classes::TComponent* Root); HIDESBASE virtual void __fastcall Click(System::TObject* Sender); virtual void __fastcall CreateParams(Controls::TCreateParams &Params); virtual void __fastcall CreateWnd(void); public: __fastcall virtual TEditBtn(Classes::TComponent* AOwner); __fastcall virtual ~TEditBtn(void); __property TEditButton* Button = {read=FButton}; __published: __property AutoSelect ; __property AutoSize ; __property Color ; __property Ctl3D ; __property DragCursor ; __property DragMode ; __property bool EditorEnabled = {read=FEditorEnabled, write=FEditorEnabled, default=1}; __property Enabled ; __property Font ; __property MaxLength ; __property ParentColor ; __property ParentCtl3D ; __property ParentFont ; __property ParentShowHint ; __property PopupMenu ; __property ReadOnly ; __property ShowHint ; __property TabOrder ; __property TabStop ; __property Text ; __property Visible ; __property OnChange ; __property OnClick ; __property OnDblClick ; __property OnDragDrop ; __property OnDragOver ; __property OnEndDrag ; __property OnEnter ; __property OnExit ; __property OnKeyDown ; __property OnKeyPress ; __property OnKeyUp ; __property OnMouseDown ; __property OnMouseMove ; __property OnMouseUp ; __property OnStartDrag ; __property Classes::TNotifyEvent OnClickBtn = {read=FOnClickBtn, write=FOnClickBtn}; public: /* TWinControl.CreateParented */ __fastcall TEditBtn(HWND ParentWindow) : Stdctrls::TCustomEdit(ParentWindow ) { } }; //-- var, const, procedure --------------------------------------------------- #define InitRepeatPause (Word)(400) #define RepeatPause (Byte)(100) extern PACKAGE void __fastcall Register(void); } /* namespace Editbtn */ #if !defined(NO_IMPLICIT_NAMESPACE_USE) using namespace Editbtn; #endif //-- end unit ---------------------------------------------------------------- #endif // EditBtn