101 lines
3.5 KiB
C++
101 lines
3.5 KiB
C++
// CodeGear C++Builder
|
|
// Copyright (c) 1995, 2024 by Embarcadero Technologies, Inc.
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'PNGButton.pas' rev: 36.00 (Windows)
|
|
|
|
#ifndef PNGButtonHPP
|
|
#define PNGButtonHPP
|
|
|
|
#pragma delphiheader begin
|
|
#pragma option push
|
|
#if defined(__BORLANDC__) && !defined(__clang__)
|
|
#pragma option -w- // All warnings off
|
|
#pragma option -Vx // Zero-length empty class member
|
|
#endif
|
|
#pragma pack(push,8)
|
|
#include <System.hpp>
|
|
#include <SysInit.hpp>
|
|
#include <System.SysUtils.hpp>
|
|
#include <Winapi.Messages.hpp>
|
|
#include <System.Classes.hpp>
|
|
#include <System.Types.hpp>
|
|
#include <Vcl.Forms.hpp>
|
|
#include <Vcl.Graphics.hpp>
|
|
#include <Vcl.Controls.hpp>
|
|
#include <Vcl.Imaging.pngimage.hpp>
|
|
#include <System.UITypes.hpp>
|
|
#include <Vcl.Menus.hpp>
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Pngbutton
|
|
{
|
|
//-- forward type declarations -----------------------------------------------
|
|
class DELPHICLASS TPNGButton;
|
|
//-- type declarations -------------------------------------------------------
|
|
class PASCALIMPLEMENTATION TPNGButton : public Vcl::Controls::TGraphicControl
|
|
{
|
|
typedef Vcl::Controls::TGraphicControl inherited;
|
|
|
|
private:
|
|
System::Classes::TNotifyEvent FOnMouseEnter;
|
|
System::Classes::TNotifyEvent FOnMouseLeave;
|
|
System::Uitypes::TModalResult FModalResult;
|
|
|
|
protected:
|
|
int EtatBtn;
|
|
bool FDown;
|
|
int FStateCount;
|
|
Vcl::Imaging::Pngimage::TPngImage* FPngImg;
|
|
bool FVisible;
|
|
DYNAMIC void __fastcall MouseDown(System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
|
|
DYNAMIC void __fastcall MouseUp(System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
|
|
MESSAGE void __fastcall MouseEnter(Winapi::Messages::TMessage &Msg);
|
|
MESSAGE void __fastcall MouseLeave(Winapi::Messages::TMessage &Msg);
|
|
virtual void __fastcall SetEnabled(bool Value);
|
|
|
|
public:
|
|
__fastcall virtual TPNGButton(System::Classes::TComponent* AOwner);
|
|
__fastcall virtual ~TPNGButton();
|
|
void __fastcall SetStateCount(int value);
|
|
void __fastcall SetPngImg(Vcl::Imaging::Pngimage::TPngImage* value);
|
|
void __fastcall SetDown(bool value);
|
|
virtual void __fastcall Paint();
|
|
DYNAMIC void __fastcall Click();
|
|
|
|
__published:
|
|
__property Action;
|
|
__property Anchors = {default=3};
|
|
__property bool Down = {read=FDown, write=SetDown, default=0};
|
|
__property Enabled = {default=1};
|
|
__property int ImgStates = {read=FStateCount, write=SetStateCount, default=4};
|
|
__property System::Uitypes::TModalResult ModalResult = {read=FModalResult, write=FModalResult, default=0};
|
|
__property ParentShowHint = {default=1};
|
|
__property Vcl::Imaging::Pngimage::TPngImage* PngImg = {read=FPngImg, write=SetPngImg};
|
|
__property PopupMenu;
|
|
__property ShowHint;
|
|
__property Visible = {default=1};
|
|
__property OnClick;
|
|
__property OnContextPopup;
|
|
__property OnMouseDown;
|
|
__property OnMouseUp;
|
|
__property OnMouseMove;
|
|
__property System::Classes::TNotifyEvent OnMouseEnter = {read=FOnMouseEnter, write=FOnMouseEnter};
|
|
__property System::Classes::TNotifyEvent OnMouseLeave = {read=FOnMouseLeave, write=FOnMouseLeave};
|
|
};
|
|
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
extern DELPHI_PACKAGE void __fastcall Register();
|
|
} /* namespace Pngbutton */
|
|
#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_PNGBUTTON)
|
|
using namespace Pngbutton;
|
|
#endif
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // PNGButtonHPP
|