object WinPersoLineSet: TWinPersoLineSet Left = 192 Top = 77 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Personal paper' ClientHeight = 372 ClientWidth = 211 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poDesktopCenter OnActivate = FormActivate OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 211 Height = 297 Align = alClient TabOrder = 0 object LabelPaper: TLabel Left = 16 Top = 5 Width = 180 Height = 16 Alignment = taCenter AutoSize = False Caption = 'Paper' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold, fsUnderline] ParentFont = False end object Label1: TLabel Left = 32 Top = 33 Width = 29 Height = 13 Caption = 'Colors' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object LblEpaisseurTrait: TLabel Left = 106 Top = 33 Width = 33 Height = 13 Caption = 'Widths' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object RGSubDiv: TRadioGroup Left = 101 Top = 187 Width = 59 Height = 66 Items.Strings = ( 'Dot' 'Dash' 'Solid') TabOrder = 0 end object BtPrnTest: TButton Left = 53 Top = 263 Width = 103 Height = 25 Hint = 'Series of lines with increasing thichnesses' Caption = '&Print test page' ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = BtPrnTestClick end end object Panel2: TPanel Left = 0 Top = 297 Width = 211 Height = 75 Align = alBottom TabOrder = 1 object BtOK: TBitBtn Left = 24 Top = 8 Width = 75 Height = 25 TabOrder = 0 TabStop = False OnClick = BtOKClick Kind = bkOK end object BtCancel: TBitBtn Left = 68 Top = 43 Width = 75 Height = 25 TabOrder = 1 TabStop = False Kind = bkCancel end object BtUndo: TButton Left = 112 Top = 8 Width = 75 Height = 25 Caption = '&Undo' TabOrder = 2 TabStop = False OnClick = BtUndoClick end end object ColorDialog1: TColorDialog Ctl3D = True Left = 8 Top = 56 end end