object Form1: TForm1 Left = 420 Height = 219 Top = 276 Width = 486 ActiveControl = Button1 Caption = 'Form1' ClientHeight = 219 ClientWidth = 486 OnCreate = FormCreate LCLVersion = '1.7' object Label1: TLabel Left = 108 Height = 14 Top = 8 Width = 103 Caption = 'Select Paper Size' ParentColor = False end object Label2: TLabel Left = 8 Height = 14 Top = 8 Width = 75 Caption = 'Resolution X' ParentColor = False end object Label3: TLabel Left = 8 Height = 14 Top = 64 Width = 75 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 = 20 Options = [lboDrawFocusRect] TabOrder = 2 end object txtResX: TEdit Left = 8 Height = 28 Top = 28 Width = 80 TabOrder = 3 Text = '72' end object txtResY: TEdit Left = 8 Height = 28 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 = 70 ClientWidth = 216 ItemIndex = 0 Items.Strings = ( 'Portrait' 'Reverse Portrait' 'Landscape' 'Reverse Landscape' ) TabOrder = 7 end end