208 lines
9.5 KiB
C++
208 lines
9.5 KiB
C++
// 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 <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 <System.Types.hpp>
|
|
#include <iexRulers.hpp>
|
|
#include <iegdiplus.hpp>
|
|
#include <System.UITypes.hpp>
|
|
#include <Vcl.Menus.hpp>
|
|
|
|
//-- 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
|