mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-02 16:43:40 +02:00
129 lines
2.5 KiB
Plaintext
129 lines
2.5 KiB
Plaintext
object Form1: TForm1
|
|
Left = 420
|
|
Height = 219
|
|
Top = 276
|
|
Width = 486
|
|
ActiveControl = Button1
|
|
Caption = 'Form1'
|
|
ClientHeight = 219
|
|
ClientWidth = 486
|
|
OnCreate = FormCreate
|
|
LCLVersion = '1.3'
|
|
object Label1: TLabel
|
|
Left = 108
|
|
Height = 21
|
|
Top = 8
|
|
Width = 117
|
|
Caption = 'Select Paper Size'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 8
|
|
Height = 21
|
|
Top = 8
|
|
Width = 84
|
|
Caption = 'Resolution X'
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
Left = 8
|
|
Height = 21
|
|
Top = 64
|
|
Width = 83
|
|
Caption = 'Resolution Y'
|
|
ParentColor = False
|
|
end
|
|
object Button1: TButton
|
|
Left = 264
|
|
Height = 25
|
|
Top = 8
|
|
Width = 212
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'Generate a PostScript file'
|
|
OnClick = Button1Click
|
|
TabOrder = 0
|
|
end
|
|
object Button2: TButton
|
|
Left = 264
|
|
Height = 25
|
|
Top = 40
|
|
Width = 212
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'Show this file (kghostview)'
|
|
OnClick = Button2Click
|
|
TabOrder = 1
|
|
end
|
|
object ListBox1: TListBox
|
|
Left = 104
|
|
Height = 87
|
|
Top = 28
|
|
Width = 124
|
|
Items.Strings = (
|
|
'A4'
|
|
'Letter'
|
|
)
|
|
ItemHeight = 27
|
|
ScrollWidth = 122
|
|
TabOrder = 2
|
|
end
|
|
object txtResX: TEdit
|
|
Left = 8
|
|
Height = 31
|
|
Top = 28
|
|
Width = 80
|
|
TabOrder = 3
|
|
Text = '72'
|
|
end
|
|
object txtResY: TEdit
|
|
Left = 8
|
|
Height = 31
|
|
Top = 84
|
|
Width = 80
|
|
TabOrder = 4
|
|
Text = '72'
|
|
end
|
|
object Button3: TButton
|
|
Left = 264
|
|
Height = 25
|
|
Top = 80
|
|
Width = 211
|
|
Caption = 'Test Transparent Image'
|
|
OnClick = Button3Click
|
|
TabOrder = 5
|
|
end
|
|
object btnTestFonts: TButton
|
|
Left = 264
|
|
Height = 25
|
|
Top = 112
|
|
Width = 211
|
|
Caption = 'Test Fonts'
|
|
OnClick = btnTestFontsClick
|
|
TabOrder = 6
|
|
end
|
|
object gpOrientation: TRadioGroup
|
|
Left = 8
|
|
Height = 96
|
|
Top = 120
|
|
Width = 220
|
|
AutoFill = True
|
|
Caption = 'Orientation'
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 1
|
|
ClientHeight = 73
|
|
ClientWidth = 216
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Portrait'
|
|
'Reverse Portrait'
|
|
'Landscape'
|
|
'Reverse Landscape'
|
|
)
|
|
TabOrder = 7
|
|
end
|
|
end
|