// CodeGear C++Builder // Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc. // All rights reserved // (DO NOT EDIT: machine generated header) 'rulerbox.pas' rev: 37.00 (Windows) #ifndef rulerboxHPP #define rulerboxHPP #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 #include #include #include #include #include #include #include #include #include #include #include #include //-- user supplied ----------------------------------------------------------- namespace Rulerbox { //-- forward type declarations ----------------------------------------------- class DELPHICLASS TRulerBox; //-- type declarations ------------------------------------------------------- class PASCALIMPLEMENTATION TRulerBox : public Vcl::Controls::TCustomControl { typedef Vcl::Controls::TCustomControl inherited; public: double operator[](int g) { return this->GripsPos[g]; } private: Iexrulers::TIERuler* fIERuler; double __fastcall GetGripsPos(int i); void __fastcall SetGripsPos(int i, double p); System::Uitypes::TColor __fastcall GetGripsColor(int i); void __fastcall SetGripsColor(int i, System::Uitypes::TColor p); double __fastcall GetGripsMin(int i); void __fastcall SetGripsMin(int i, double v); double __fastcall GetGripsMax(int i); void __fastcall SetGripsMax(int i, double v); double __fastcall GetViewMin(); void __fastcall SetViewMin(double v); double __fastcall GetViewMax(); void __fastcall SetViewMax(double v); double __fastcall GetViewPos(); void __fastcall SetViewPos(double v); double __fastcall GetDPU(); void __fastcall SetDPU(double v); int __fastcall GetOffsetX(); void __fastcall SetOffsetX(int v); int __fastcall GetOffsetY(); void __fastcall SetOffsetY(int v); int __fastcall GetMinLabelSpacing(); void __fastcall SetMinLabelSpacing(int v); double __fastcall GetFrequency(); void __fastcall SetFrequency(double v); double __fastcall GetLabelFreq(); void __fastcall SetLabelFreq(double v); bool __fastcall GetRuler(); void __fastcall SetRuler(bool v); System::Uitypes::TColor __fastcall GetRulerColor(); void __fastcall SetRulerColor(System::Uitypes::TColor v); Iexrulers::TRulerDir __fastcall GetRulerDir(); void __fastcall SetRulerDir(Iexrulers::TRulerDir v); System::Uitypes::TColor __fastcall GetBackground(); void __fastcall SetBackground(System::Uitypes::TColor bk); bool __fastcall GetFitInView(); void __fastcall SetFitInView(bool v); bool __fastcall GetHexLabels(); void __fastcall SetHexLabels(bool v); bool __fastcall GetInverted(); void __fastcall SetInverted(bool v); int __fastcall GetLabelPrecision(); void __fastcall SetLabelPrecision(int v); double __fastcall GetScrollRate(); void __fastcall SetScrollRate(const double Value); int __fastcall GetGripsCount(); void __fastcall SetGripsCount(int v); Iexrulers::TGripKind __fastcall GetGripKindDefault(); void __fastcall SetGripKindDefault(const Iexrulers::TGripKind Value); Iexrulers::TGripKind __fastcall GetGripsKind(int i); void __fastcall SetGripsKind(int i, Iexrulers::TGripKind v); Iexrulers::TGripsDir __fastcall GetGripsDir(); void __fastcall SetGripsDir(Iexrulers::TGripsDir v); System::Uitypes::TColor __fastcall GetGripColorDefault(); void __fastcall SetGripColorDefault(const System::Uitypes::TColor Value); System::Uitypes::TColor __fastcall GetGripPenColor(); void __fastcall SetGripPenColor(const System::Uitypes::TColor Value); int __fastcall GetGripBaseDim(); void __fastcall SetGripBaseDim(int v); int __fastcall GetMaxGripHeight(); void __fastcall SetMaxGripHeight(const int Value); Iexrulers::TRulerClickEvent __fastcall GetOnRulerClick(); void __fastcall SetOnRulerClick(const Iexrulers::TRulerClickEvent Value); Iexrulers::TRulerGripClickEvent __fastcall GetOnRulerGripClick(); void __fastcall SetOnRulerGripClick(const Iexrulers::TRulerGripClickEvent Value); Iexrulers::TRulerGripClickEvent __fastcall GetOnRulerGripDblClick(); void __fastcall SetOnRulerGripDblClick(const Iexrulers::TRulerGripClickEvent Value); Iexrulers::TRulerGripPosChangeEvent __fastcall GetOnRulerPosChange(); void __fastcall SetOnRulerPosChange(const Iexrulers::TRulerGripPosChangeEvent Value); bool __fastcall GetShowBorder(); void __fastcall SetShowBorder(const bool Value); 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); HIDESBASE MESSAGE void __fastcall CMFontChanged(Winapi::Messages::TMessage &Message); public: virtual void __fastcall Paint(); __fastcall virtual TRulerBox(System::Classes::TComponent* Owner); __fastcall virtual ~TRulerBox(); virtual void __fastcall Update(); void __fastcall LockUpdate(); void __fastcall UnlockUpdate(); __property double GripsPos[int g] = {read=GetGripsPos, write=SetGripsPos/*, default*/}; __property System::Uitypes::TColor GripsColor[int g] = {read=GetGripsColor, write=SetGripsColor}; __property Iexrulers::TGripKind GripsKind[int g] = {read=GetGripsKind, write=SetGripsKind}; __property double GripsMin[int g] = {read=GetGripsMin, write=SetGripsMin}; __property double GripsMax[int g] = {read=GetGripsMax, write=SetGripsMax}; __property double ScrollRate = {read=GetScrollRate, write=SetScrollRate}; __published: __property double ViewPos = {read=GetViewPos, write=SetViewPos}; __property System::Uitypes::TColor Background = {read=GetBackground, write=SetBackground, default=-16777201}; __property System::Uitypes::TColor GripPenColor = {read=GetGripPenColor, write=SetGripPenColor, default=0}; __property int GripBaseDim = {read=GetGripBaseDim, write=SetGripBaseDim, default=12}; __property Iexrulers::TGripsDir GripsDir = {read=GetGripsDir, write=SetGripsDir, default=0}; __property bool Ruler = {read=GetRuler, write=SetRuler, default=1}; __property double DotPerUnit = {read=GetDPU, write=SetDPU}; __property double Frequency = {read=GetFrequency, write=SetFrequency}; __property double LabelFreq = {read=GetLabelFreq, write=SetLabelFreq}; __property System::Uitypes::TColor RulerColor = {read=GetRulerColor, write=SetRulerColor, default=-16777201}; __property Iexrulers::TRulerDir RulerDir = {read=GetRulerDir, write=SetRulerDir, default=0}; __property double ViewMin = {read=GetViewMin, write=SetViewMin}; __property double ViewMax = {read=GetViewMax, write=SetViewMax}; __property int LabelPrecision = {read=GetLabelPrecision, write=SetLabelPrecision, default=3}; __property int MinLabelSpacing = {read=GetMinLabelSpacing, write=SetMinLabelSpacing, default=30}; __property Iexrulers::TGripKind GripKindDefault = {read=GetGripKindDefault, write=SetGripKindDefault, default=0}; __property System::Uitypes::TColor GripColorDefault = {read=GetGripColorDefault, write=SetGripColorDefault, default=-16777201}; __property int OffsetX = {read=GetOffsetX, write=SetOffsetX, default=0}; __property int OffsetY = {read=GetOffsetY, write=SetOffsetY, default=0}; __property bool Inverted = {read=GetInverted, write=SetInverted, default=0}; __property bool FitInView = {read=GetFitInView, write=SetFitInView, default=0}; __property int GripsCount = {read=GetGripsCount, write=SetGripsCount, default=1}; __property bool HexLabels = {read=GetHexLabels, write=SetHexLabels, default=0}; __property bool ShowBorder = {read=GetShowBorder, write=SetShowBorder, default=0}; __property int MaxGripHeight = {read=GetMaxGripHeight, write=SetMaxGripHeight, nodefault}; __property Iexrulers::TRulerGripPosChangeEvent OnRulerPosChange = {read=GetOnRulerPosChange, write=SetOnRulerPosChange}; __property Iexrulers::TRulerGripClickEvent OnRulerGripClick = {read=GetOnRulerGripClick, write=SetOnRulerGripClick}; __property Iexrulers::TRulerGripClickEvent OnRulerGripDblClick = {read=GetOnRulerGripDblClick, write=SetOnRulerGripDblClick}; __property Iexrulers::TRulerClickEvent OnRulerClick = {read=GetOnRulerClick, write=SetOnRulerClick}; __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 Width; __property Height; __property Font; __property MouseCapture; public: /* TWinControl.CreateParented */ inline __fastcall TRulerBox(HWND ParentWindow) : Vcl::Controls::TCustomControl(ParentWindow) { } }; //-- var, const, procedure --------------------------------------------------- } /* namespace Rulerbox */ #if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_RULERBOX) using namespace Rulerbox; #endif #pragma pack(pop) #pragma option pop #pragma delphiheader end. //-- end unit ---------------------------------------------------------------- #endif // rulerboxHPP