fcimagepanel.hpp
上传用户:hylc_2004
上传日期:2014-01-23
资源大小:46800k
文件大小:4k
- // Borland C++ Builder
- // Copyright (c) 1995, 2002 by Borland Software Corporation
- // All rights reserved
- // (DO NOT EDIT: machine generated header) 'fcimagepanel.pas' rev: 6.00
- #ifndef fcimagepanelHPP
- #define fcimagepanelHPP
- #pragma delphiheader begin
- #pragma option push -w-
- #pragma option push -Vx
- #include <Menus.hpp> // Pascal unit
- #include <fcImage.hpp> // Pascal unit
- #include <fcCommon.hpp> // Pascal unit
- #include <Buttons.hpp> // Pascal unit
- #include <ExtCtrls.hpp> // Pascal unit
- #include <StdCtrls.hpp> // Pascal unit
- #include <Dialogs.hpp> // Pascal unit
- #include <Forms.hpp> // Pascal unit
- #include <Controls.hpp> // Pascal unit
- #include <Graphics.hpp> // Pascal unit
- #include <Classes.hpp> // Pascal unit
- #include <SysUtils.hpp> // Pascal unit
- #include <Messages.hpp> // Pascal unit
- #include <Windows.hpp> // Pascal unit
- #include <SysInit.hpp> // Pascal unit
- #include <System.hpp> // Pascal unit
- //-- user supplied -----------------------------------------------------------
- namespace Fcimagepanel
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TfcCustomImagePanel;
- class PASCALIMPLEMENTATION TfcCustomImagePanel : public Extctrls::TCustomPanel
- {
- typedef Extctrls::TCustomPanel inherited;
-
- private:
- Graphics::TColor FTransparentColor;
- HRGN FRegion;
- Controls::TWinControl* FControl;
- Fcimage::TfcCustomImage* FImage;
- bool InUpdateSize;
- void __fastcall ReadRegions(Classes::TStream* Reader);
- void __fastcall WriteRegions(Classes::TStream* Writer);
- Graphics::TPicture* __fastcall GetPicture(void);
- void __fastcall SetPicture(Graphics::TPicture* Value);
- void __fastcall SetControl(Controls::TWinControl* Value);
-
- protected:
- virtual void __fastcall DestroyWnd(void);
- Graphics::TColor __fastcall GetTransparentColor(void);
- virtual void __fastcall DefineProperties(Classes::TFiler* Filer);
- virtual void __fastcall SetParent(Controls::TWinControl* Value);
- virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
- virtual void __fastcall Paint(void);
- DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
- void __fastcall UpdateSize(void);
-
- public:
- Variant Patch;
- __fastcall virtual TfcCustomImagePanel(Classes::TComponent* Aowner);
- __fastcall virtual ~TfcCustomImagePanel(void);
- virtual void __fastcall ApplyBitmapRegion(void);
- __property HRGN RegionData = {read=FRegion, stored=true, nodefault};
- __property Graphics::TPicture* Picture = {read=GetPicture, write=SetPicture};
- __property Graphics::TColor TransparentColor = {read=FTransparentColor, write=FTransparentColor, default=536870911};
- __property Controls::TWinControl* Control = {read=FControl, write=SetControl};
- public:
- #pragma option push -w-inl
- /* TWinControl.CreateParented */ inline __fastcall TfcCustomImagePanel(HWND ParentWindow) : Extctrls::TCustomPanel(ParentWindow) { }
- #pragma option pop
-
- };
- class DELPHICLASS TfcImagePanel;
- class PASCALIMPLEMENTATION TfcImagePanel : public TfcCustomImagePanel
- {
- typedef TfcCustomImagePanel inherited;
-
- __published:
- __property Align = {default=0};
- __property AutoSize = {default=0};
- __property Picture ;
- __property PopupMenu ;
- __property ShowHint ;
- __property Visible = {default=1};
- __property OnClick ;
- __property OnDblClick ;
- __property OnMouseDown ;
- __property OnMouseMove ;
- __property OnMouseUp ;
- __property TransparentColor = {default=536870911};
- public:
- #pragma option push -w-inl
- /* TfcCustomImagePanel.Create */ inline __fastcall virtual TfcImagePanel(Classes::TComponent* Aowner) : TfcCustomImagePanel(Aowner) { }
- #pragma option pop
- #pragma option push -w-inl
- /* TfcCustomImagePanel.Destroy */ inline __fastcall virtual ~TfcImagePanel(void) { }
- #pragma option pop
-
- public:
- #pragma option push -w-inl
- /* TWinControl.CreateParented */ inline __fastcall TfcImagePanel(HWND ParentWindow) : TfcCustomImagePanel(ParentWindow) { }
- #pragma option pop
-
- };
- //-- var, const, procedure ---------------------------------------------------
- #pragma error Unsupported symbol type (23, fcimagepanel)
- extern PACKAGE void __fastcall Register(void);
- } /* namespace Fcimagepanel */
- using namespace Fcimagepanel;
- #pragma option pop // -w-
- #pragma option pop // -Vx
- #pragma delphiheader end.
- //-- end unit ----------------------------------------------------------------
- #endif // fcimagepanel