124 lines
4.7 KiB
C++
124 lines
4.7 KiB
C++
// CodeGear C++Builder
|
|
// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'iegradientbar.pas' rev: 37.00 (Windows)
|
|
|
|
#ifndef iegradientbarHPP
|
|
#define iegradientbarHPP
|
|
|
|
#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 <Winapi.Windows.hpp>
|
|
#include <Winapi.Messages.hpp>
|
|
#include <System.SysUtils.hpp>
|
|
#include <System.Classes.hpp>
|
|
#include <Vcl.Graphics.hpp>
|
|
#include <Vcl.Controls.hpp>
|
|
#include <Vcl.Forms.hpp>
|
|
#include <imageenproc.hpp>
|
|
#include <hyiedefs.hpp>
|
|
#include <iegdiplus.hpp>
|
|
#include <System.UITypes.hpp>
|
|
#include <Vcl.Menus.hpp>
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Iegradientbar
|
|
{
|
|
//-- forward type declarations -----------------------------------------------
|
|
class DELPHICLASS TIEGradientBar;
|
|
//-- type declarations -------------------------------------------------------
|
|
enum DECLSPEC_DENUM TIEMouseInteractItemsGr : unsigned char { migDragGrip };
|
|
|
|
typedef System::Set<TIEMouseInteractItemsGr, TIEMouseInteractItemsGr::migDragGrip, TIEMouseInteractItemsGr::migDragGrip> TIEMouseInteractGr;
|
|
|
|
class PASCALIMPLEMENTATION TIEGradientBar : public Vcl::Controls::TCustomControl
|
|
{
|
|
typedef Vcl::Controls::TCustomControl inherited;
|
|
|
|
private:
|
|
int fColorIndex;
|
|
System::Uitypes::TColor fBeginColor;
|
|
System::Uitypes::TColor fEndColor;
|
|
System::StaticArray<System::Uitypes::TColor, 256> fGradient;
|
|
Hyiedefs::TIEGradientDir fDirection;
|
|
System::Classes::TNotifyEvent fOnChange;
|
|
TIEMouseInteractGr fMouseInteract;
|
|
void __fastcall SetColorIndex(int v);
|
|
void __fastcall SetBeginColor(System::Uitypes::TColor v);
|
|
void __fastcall SetEndColor(System::Uitypes::TColor v);
|
|
System::Uitypes::TColor __fastcall GetColor();
|
|
Hyiedefs::TRGB __fastcall GetRGB();
|
|
void __fastcall SetDirection(Hyiedefs::TIEGradientDir v);
|
|
void __fastcall SetMouseInteractGr(TIEMouseInteractGr v);
|
|
TIEMouseInteractGr __fastcall GetMouseInteractGr();
|
|
|
|
protected:
|
|
HIDESBASE MESSAGE void __fastcall WMSize(Winapi::Messages::TWMSize &Message);
|
|
HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Winapi::Messages::TMessage &Message);
|
|
DYNAMIC void __fastcall MouseMove(System::Classes::TShiftState Shift, int X, int Y);
|
|
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);
|
|
void __fastcall CalcGradient();
|
|
void __fastcall DrawGrip();
|
|
|
|
public:
|
|
virtual void __fastcall Paint();
|
|
__fastcall virtual TIEGradientBar(System::Classes::TComponent* Owner);
|
|
__fastcall virtual ~TIEGradientBar();
|
|
__property int ColorIndex = {read=fColorIndex, write=SetColorIndex, nodefault};
|
|
__property System::Uitypes::TColor Color = {read=GetColor, nodefault};
|
|
__property Hyiedefs::TRGB RGB = {read=GetRGB};
|
|
|
|
__published:
|
|
__property System::Uitypes::TColor BeginColor = {read=fBeginColor, write=SetBeginColor, default=0};
|
|
__property System::Uitypes::TColor EndColor = {read=fEndColor, write=SetEndColor, default=16777215};
|
|
__property Hyiedefs::TIEGradientDir Direction = {read=fDirection, write=SetDirection, default=1};
|
|
__property System::Classes::TNotifyEvent OnChange = {read=fOnChange, write=fOnChange};
|
|
__property TIEMouseInteractGr MouseInteract = {read=GetMouseInteractGr, write=SetMouseInteractGr, default=1};
|
|
__property Width = {default=40};
|
|
__property Height = {default=300};
|
|
__property Align = {default=0};
|
|
__property DragCursor = {default=-12};
|
|
__property DragMode = {default=0};
|
|
__property Enabled = {default=1};
|
|
__property ParentShowHint = {default=1};
|
|
__property PopupMenu;
|
|
__property ShowHint;
|
|
__property Visible = {default=1};
|
|
__property OnClick;
|
|
__property OnDblClick;
|
|
__property OnDragDrop;
|
|
__property OnDragOver;
|
|
__property OnEndDrag;
|
|
__property OnMouseDown;
|
|
__property OnMouseMove;
|
|
__property OnMouseUp;
|
|
__property OnStartDrag;
|
|
__property OnContextPopup;
|
|
public:
|
|
/* TWinControl.CreateParented */ inline __fastcall TIEGradientBar(HWND ParentWindow) : Vcl::Controls::TCustomControl(ParentWindow) { }
|
|
|
|
};
|
|
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
} /* namespace Iegradientbar */
|
|
#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_IEGRADIENTBAR)
|
|
using namespace Iegradientbar;
|
|
#endif
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // iegradientbarHPP
|