Class TSetPosDialog (unit PosDlg)
Inherits from
TForm
Constructors
Functions
procedure btnColorClick(Sender: TObject);
procedure cbFixHeightClick(Sender: TObject);
procedure cbFixHorClick(Sender: TObject);
procedure cbFixVerClick(Sender: TObject);
procedure cbFixWidthClick(Sender: TObject);
procedure CheckBox1Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure rfEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure rfEditMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
procedure rfEditMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Properties
Events
Variables
btnColor : TButton;
CancelBtn : TButton;
cbFixHeight : TCheckBox;
cbFixHor : TCheckBox;
cbFixVer : TCheckBox;
cbFixWidth : TCheckBox;
CheckBox1 : TCheckBox;
ColorDialog : TColorDialog;
OKBtn : TButton;
Panel2 : TPanel;
rfEdit : TRasterFontEditor;
ScrollBox1 : TScrollBox;
StatusLine : TStatusBar;
Constructors
Functions
procedure btnColorClick(Sender: TObject);
procedure cbFixHeightClick(Sender: TObject);
procedure cbFixHorClick(Sender: TObject);
procedure cbFixVerClick(Sender: TObject);
procedure cbFixWidthClick(Sender: TObject);
procedure CheckBox1Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure rfEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure rfEditMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
procedure rfEditMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Properties
Events
Variables
btnColor : TButton;
CancelBtn : TButton;
cbFixHeight : TCheckBox;
cbFixHor : TCheckBox;
cbFixVer : TCheckBox;
cbFixWidth : TCheckBox;
CheckBox1 : TCheckBox;
ColorDialog : TColorDialog;
OKBtn : TButton;
Panel2 : TPanel;
rfEdit : TRasterFontEditor;
ScrollBox1 : TScrollBox;
StatusLine : TStatusBar;