[Properties (by Name)] [Methods (by Name)] [Events (by Name)]
Source position: framepagesetup.pas line 25
type TframePageSetup = class(TFrame) |
||
cbPaper: TComboBox; |
|
|
cbSource: TComboBox; |
|
|
Label1: TLabel; |
|
|
panMargins: TPanel; |
|
|
txtLeft: TFloatSpinEdit; |
|
|
txtTop: TFloatSpinEdit; |
|
|
txtRight: TFloatSpinEdit; |
|
|
txtBottom: TFloatSpinEdit; |
|
|
gpPaper: TGroupBox; |
|
|
gpOrientation: TGroupBox; |
|
|
gpMargins: TGroupBox; |
|
|
lblSource: TLabel; |
|
|
lblPaper: TLabel; |
|
|
lblLeft: TLabel; |
|
|
lblRight: TLabel; |
|
|
lblTop: TLabel; |
|
|
lblBottom: TLabel; |
|
|
pbPreview: TPaintBox; |
|
|
panSetup: TPanel; |
|
|
panPreview: TPanel; |
|
|
radLandscape: TRadioButton; |
|
|
radPortrait: TRadioButton; |
|
|
procedure cbPaperChange(); |
|
|
procedure pbPreviewPaint(); |
|
|
procedure radPortraitClick(); |
|
|
procedure txtLeftChange(); |
|
|
public |
||
UnitInches: Boolean; |
|
|
EnablePreview: Boolean; |
|
|
EnableMargins: Boolean; |
|
|
EnablePapers: Boolean; |
|
|
EnableOrientation: Boolean; |
|
|
CurPageWidth: Double; |
|
|
CurPageHeight: Double; |
|
|
procedure Initialize(); |
|
|
procedure UpdatePageSize; |
|
|
procedure UpdateMaxValues; |
|
|
procedure SetDefaultMinMargins; |
|
|
end; |
|
||
| | ||
TObject |
CT Web help |
CodeTyphon Studio |