object WinMain: TWinMain Left = 251 Top = 37 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Graph paper printer 4.20' ClientHeight = 544 ClientWidth = 754 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PanelDiagram: TPanel Left = 425 Top = 0 Width = 329 Height = 334 TabOrder = 1 object Shape5: TShape Left = 1 Top = 1 Width = 327 Height = 20 Align = alTop Brush.Color = clNavy end object Label26: TLabel Left = 144 Top = 3 Width = 40 Height = 13 Caption = 'Design' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object BtKeepPerso: TButton Left = 114 Top = 296 Width = 100 Height = 25 Hint = 'To add the design in personal papers' Caption = '&Keep design' ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = False OnClick = BtKeepPersoClick end object BtYesEditPerso: TButton Left = 16 Top = 296 Width = 145 Height = 25 Caption = '&Yes, keep new parameters' TabOrder = 1 TabStop = False Visible = False OnClick = BtOKCancelEditPersoClick end object BtNoEditPerso: TButton Tag = 1 Left = 168 Top = 296 Width = 145 Height = 25 Caption = '&No, reset old parameters' TabOrder = 2 TabStop = False Visible = False OnClick = BtOKCancelEditPersoClick end end object PanelPol: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 4 Visible = False object GBAngles: TGroupBox Left = 169 Top = 12 Width = 148 Height = 60 Caption = ' Polar scale' TabOrder = 1 object Label18: TLabel Left = 7 Top = 25 Width = 42 Height = 13 Caption = 'Divisions' end object CBAngle: TComboBox Left = 56 Top = 22 Width = 83 Height = 21 Style = csDropDownList DropDownCount = 12 ItemHeight = 13 Items.Strings = ( '5 degrees' '6 degrees' '9 degrees' '10 degrees' '15 degrees' '30 degrees' '45 degrees' '60 degrees' '90 degrees' 'Absent') TabOrder = 0 OnChange = RefreshPreview end end object GBIncreasingGrad: TGroupBox Left = 170 Top = 78 Width = 147 Height = 59 Caption = ' Increasing graduations ' TabOrder = 2 object RBCenterToOut: TRadioButton Left = 20 Top = 16 Width = 113 Height = 17 Caption = 'Center to outside' Checked = True TabOrder = 0 TabStop = True OnClick = RefreshPreview end object RBOutToCenter: TRadioButton Tag = 1 Left = 20 Top = 36 Width = 113 Height = 17 Caption = 'Outside to center' TabOrder = 1 OnClick = RefreshPreview end end object GroupBox3: TGroupBox Left = 8 Top = 12 Width = 153 Height = 125 Caption = ' Radial scale ' TabOrder = 0 object Label16: TLabel Left = 4 Top = 30 Width = 27 Height = 13 Caption = 'Scale' end object Label17: TLabel Left = 4 Top = 66 Width = 42 Height = 13 Caption = 'Divisions' end object CBRScale: TComboBox Tag = 2 Left = 50 Top = 25 Width = 95 Height = 21 Style = csDropDownList DropDownCount = 10 ItemHeight = 13 TabOrder = 0 OnChange = CBRadScaleChange end object CBRDiv: TComboBox Tag = 2 Left = 50 Top = 63 Width = 95 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = RefreshPreview end object CBSubdivPol: TCheckBox Tag = 1 Left = 35 Top = 97 Width = 83 Height = 17 Caption = 'Sub-divisions' Checked = True State = cbChecked TabOrder = 4 OnClick = CBSubdivClick end object EditRDiv: TEdit Tag = 2 Left = 50 Top = 63 Width = 44 Height = 21 MaxLength = 3 TabOrder = 2 Text = '10' OnKeyPress = EditDiagramKeyPress end object BtApplyRDiv: TButton Tag = 2 Left = 102 Top = 64 Width = 41 Height = 21 Caption = 'Apply' TabOrder = 3 TabStop = False OnClick = BtApplyDiagramClick end end end object PanelCustom: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 5 Visible = False object Label8: TLabel Left = 18 Top = 38 Width = 121 Height = 13 Caption = 'Space between light lines' end object Label11: TLabel Left = 18 Top = 64 Width = 113 Height = 13 Caption = 'One medium line every ' end object Label12: TLabel Left = 18 Top = 90 Width = 103 Height = 13 Caption = 'One heavy line every ' end object Label13: TLabel Left = 253 Top = 66 Width = 38 Height = 13 Caption = 'light line' end object Label14: TLabel Left = 253 Top = 91 Width = 55 Height = 13 Caption = 'medium line' end object Label9: TLabel Left = 145 Top = 15 Width = 35 Height = 13 Caption = 'Vertical' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LblUMeasureSpaceCust: TLabel Left = 253 Top = 38 Width = 19 Height = 13 Caption = 'Unit' end object Label15: TLabel Left = 197 Top = 15 Width = 47 Height = 13 Caption = 'Horizontal' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Bevel2: TBevel Left = 7 Top = 6 Width = 312 Height = 143 Shape = bsFrame end object EditXSpace: TEdit Tag = 8 Left = 144 Top = 34 Width = 48 Height = 21 MaxLength = 8 TabOrder = 0 Text = '0.2' OnKeyPress = EditDiagramKeyPress end object EditYSpace: TEdit Tag = 9 Left = 199 Top = 34 Width = 48 Height = 21 MaxLength = 8 TabOrder = 3 Text = '0.3' OnKeyPress = EditDiagramKeyPress end object EditFMedX: TEdit Tag = 18 Left = 144 Top = 61 Width = 48 Height = 21 MaxLength = 4 TabOrder = 1 Text = '2' OnKeyPress = EditDiagramKeyPress end object EditFThickX: TEdit Tag = 19 Left = 144 Top = 87 Width = 48 Height = 21 MaxLength = 4 TabOrder = 2 Text = '2' OnKeyPress = EditDiagramKeyPress end object EditFMedY: TEdit Tag = 20 Left = 199 Top = 61 Width = 48 Height = 21 MaxLength = 4 TabOrder = 4 Text = '4' OnKeyPress = EditDiagramKeyPress end object EditFThickY: TEdit Tag = 21 Left = 199 Top = 87 Width = 48 Height = 21 MaxLength = 4 TabOrder = 5 Text = '2' OnKeyPress = EditDiagramKeyPress end object BtApplyCustom: TButton Tag = 8 Left = 145 Top = 115 Width = 103 Height = 21 Caption = 'Apply' TabOrder = 6 TabStop = False OnClick = BtApplyDiagramClick end end object PanelclGrid: TPanel Left = 426 Top = 212 Width = 326 Height = 72 BevelOuter = bvNone TabOrder = 24 Visible = False object GroupBox4: TGroupBox Left = 7 Top = 2 Width = 312 Height = 68 Caption = ' Lines ' TabOrder = 0 object LblEpaisseurTrait: TLabel Left = 11 Top = 29 Width = 28 Height = 13 Caption = 'Width' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label23: TLabel Left = 11 Top = 46 Width = 24 Height = 13 Caption = 'Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 63 Top = 11 Width = 31 Height = 13 Caption = 'Heavy' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object LblEpBig: TLabel Left = 61 Top = 29 Width = 30 Height = 13 Alignment = taCenter AutoSize = False Caption = '3' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Shape1: TShape Left = 67 Top = 48 Width = 20 Height = 10 Shape = stEllipse end object Label10: TLabel Left = 108 Top = 11 Width = 37 Height = 13 Caption = 'Medium' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object LblEpMiddle: TLabel Left = 108 Top = 29 Width = 30 Height = 13 Alignment = taCenter AutoSize = False Caption = '2' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Shape2: TShape Left = 115 Top = 48 Width = 20 Height = 10 Shape = stEllipse end object Label21: TLabel Left = 156 Top = 11 Width = 23 Height = 13 Caption = 'Light' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object LblEpSmall: TLabel Left = 152 Top = 29 Width = 30 Height = 13 Alignment = taCenter AutoSize = False Caption = '1' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Shape3: TShape Left = 158 Top = 48 Width = 20 Height = 10 Shape = stEllipse end object PanelclSubdiv: TPanel Left = 184 Top = 9 Width = 66 Height = 50 BevelOuter = bvNone TabOrder = 0 Visible = False object Label25: TLabel Left = 3 Top = 1 Width = 59 Height = 13 Caption = 'Subdivisions' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object Shape4: TShape Left = 23 Top = 38 Width = 20 Height = 10 Shape = stEllipse end object PBoxSubdiv: TPaintBox Left = 3 Top = 26 Width = 59 Height = 2 Color = clWhite ParentColor = False OnPaint = PBoxSubdivPaint end end object BtChangeColorGrid: TButton Left = 255 Top = 23 Width = 48 Height = 24 Hint = 'color and width of lines' Caption = 'Ch&ange' ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = BtChangeColorClick end end end object PanelPerso: TPanel Left = 426 Top = 62 Width = 326 Height = 271 BevelOuter = bvNone TabOrder = 19 Visible = False object LbPerso: TListBox Left = 0 Top = 0 Width = 224 Height = 271 Align = alLeft ItemHeight = 13 TabOrder = 0 OnClick = LbPersoClick OnDblClick = BtEditPersoClick OnKeyDown = LbPersoKeyDown end object BtDeletePerso: TButton Left = 244 Top = 145 Width = 66 Height = 25 Caption = '&Delete' TabOrder = 1 TabStop = False OnClick = BtDeletePersoClick end object BtEditPerso: TButton Left = 244 Top = 57 Width = 66 Height = 25 Caption = '&Edit' TabOrder = 2 TabStop = False OnClick = BtEditPersoClick end object BtRenamePerso: TButton Left = 244 Top = 101 Width = 66 Height = 25 Caption = '&Rename' TabOrder = 3 TabStop = False OnClick = BtRenamePersoClick end object BtSortPerso: TButton Left = 244 Top = 189 Width = 66 Height = 25 Caption = 'S&ort' TabOrder = 4 TabStop = False OnClick = BtSortPersoClick end end object PanelPreview: TPanel Left = 0 Top = 0 Width = 425 Height = 409 BorderWidth = 1 Caption = 'PanelPreview' TabOrder = 30 object Shape6: TShape Left = 2 Top = 2 Width = 421 Height = 20 Align = alTop Brush.Color = clNavy end object LblPreview: TLabel Left = 90 Top = 4 Width = 246 Height = 13 Alignment = taCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object ScrollBox: TScrollBox Left = 78 Top = 65 Width = 208 Height = 271 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True BorderStyle = bsNone Color = clWhite ParentColor = False TabOrder = 0 object Feuille: TPanel Left = 0 Top = 0 Width = 208 Height = 271 BevelOuter = bvNone Color = clWhite TabOrder = 0 object PBox: TPaintBox Left = 0 Top = 0 Width = 208 Height = 271 Align = alClient Color = clSilver ParentColor = False OnMouseDown = PBoxMouseDown OnMouseMove = PBoxMouseMove OnMouseUp = PBoxMouseUp OnPaint = PBoxPaint end end end end object PanelSizePosition: TPanel Left = 0 Top = 409 Width = 425 Height = 134 TabOrder = 0 object Shape7: TShape Left = 1 Top = 1 Width = 423 Height = 20 Align = alTop Brush.Color = clNavy end object Label27: TLabel Left = 192 Top = 3 Width = 41 Height = 13 Caption = 'Outline' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object BtCenterV: TButton Left = 307 Top = 31 Width = 96 Height = 19 Hint = 'Diagram in the center of the page' Caption = 'Center vertically' ParentShowHint = False ShowHint = True TabOrder = 4 TabStop = False OnClick = BtCenterVClick end object BtCenterH: TButton Left = 307 Top = 55 Width = 96 Height = 19 Hint = 'Diagram in the center of the page' Caption = 'Center horizontally' ParentShowHint = False ShowHint = True TabOrder = 5 TabStop = False OnClick = BtCenterHClick end object BtFullPaper: TButton Left = 307 Top = 80 Width = 96 Height = 19 Hint = 'No margins' Caption = 'Full paper' ParentShowHint = False ShowHint = True TabOrder = 6 TabStop = False OnClick = BtFullPaperClick end object GBMargins: TGroupBox Left = 19 Top = 25 Width = 125 Height = 100 Caption = ' Margins ' TabOrder = 0 object Label28: TLabel Left = 16 Top = 46 Width = 33 Height = 13 Caption = 'Bottom' FocusControl = EditBMargin end object Label29: TLabel Left = 16 Top = 21 Width = 21 Height = 13 Caption = 'Left ' FocusControl = EditLMargin end object EditBMargin: TEdit Left = 64 Top = 45 Width = 49 Height = 21 TabOrder = 1 OnKeyPress = EditFormatKeyPress end object EditLMargin: TEdit Left = 64 Top = 18 Width = 49 Height = 21 TabOrder = 0 OnKeyPress = EditFormatKeyPress end object BtApplyMargins: TBitBtn Left = 37 Top = 73 Width = 50 Height = 19 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyMarginsClick end end object BtStdSize: TButton Left = 307 Top = 104 Width = 96 Height = 19 Hint = 'Default margins' Caption = 'Standard margins' ParentShowHint = False ShowHint = True TabOrder = 7 TabStop = False OnClick = BtStdSizeClick end object GBDiametre: TGroupBox Tag = 1 Left = 162 Top = 25 Width = 125 Height = 100 Caption = ' Size ' TabOrder = 2 Visible = False object LblDiam: TLabel Left = 10 Top = 35 Width = 42 Height = 13 Caption = 'Diameter' FocusControl = EditDiam end object EditDiam: TEdit Tag = 1 Left = 60 Top = 32 Width = 49 Height = 21 TabOrder = 0 OnKeyPress = EditFormatKeyPress end object BtApplyDiametre: TBitBtn Tag = 1 Left = 37 Top = 68 Width = 50 Height = 19 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyLargHautClick end end object GBCote: TGroupBox Tag = 3 Left = 162 Top = 25 Width = 125 Height = 100 Caption = ' Size ' TabOrder = 3 Visible = False object Label33: TLabel Left = 5 Top = 33 Width = 53 Height = 13 Caption = 'Side length' FocusControl = EditCote end object EditCote: TEdit Tag = 1 Left = 64 Top = 30 Width = 49 Height = 21 TabOrder = 0 OnKeyPress = EditFormatKeyPress end object BtApplyCote: TBitBtn Tag = 3 Left = 37 Top = 65 Width = 50 Height = 19 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyLargHautClick end end object GBLargHaut: TGroupBox Left = 162 Top = 25 Width = 125 Height = 100 Caption = ' Size ' DragKind = dkDock TabOrder = 1 Visible = False object LblWidth: TLabel Left = 11 Top = 20 Width = 28 Height = 13 Caption = 'Width' FocusControl = EditWidth end object LblHeight: TLabel Left = 11 Top = 47 Width = 31 Height = 13 Caption = 'Height' FocusControl = EditHeight end object EditWidth: TEdit Tag = 1 Left = 56 Top = 17 Width = 49 Height = 21 TabOrder = 0 OnKeyPress = EditFormatKeyPress end object EditHeight: TEdit Tag = 1 Left = 56 Top = 44 Width = 49 Height = 21 TabOrder = 1 OnKeyPress = EditFormatKeyPress end object BtApplyLargHaut: TBitBtn Left = 37 Top = 73 Width = 50 Height = 19 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyLargHautClick end end end object PanelGeneral: TPanel Left = 425 Top = 431 Width = 329 Height = 112 TabOrder = 29 object Shape12: TShape Left = 1 Top = 1 Width = 327 Height = 20 Align = alTop Brush.Color = clNavy end object Label30: TLabel Left = 141 Top = 4 Width = 45 Height = 13 Caption = 'General' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object BtLoupe: TSpeedButton Left = 13 Top = 34 Width = 43 Height = 62 Hint = 'Enlarge with true colors' AllowAllUp = True GroupIndex = 2 Caption = 'Zoom' Glyph.Data = { 76090000424D7609000000000000760000002800000080000000240000000100 0400000000000009000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF F808800FFFFFFFFFFFFFFFFFFFFFFFFFF808800FFFFFFFFFFFFFFFFFFFFFFFFF F808800FFFFFFFFFFFFFFFFFFFFFFFFFF808800FFFFFFFFFFFFFFFFFFFFFFFFF 88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF 88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF 88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF 88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF 88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF 88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF 88800000FFFFFFFFFFFFFFFFFFFFFFFF88800000FFFFFFFFFFFFFFFFFFFFFFFF 88800000FFFFFFFFFFFFFFFFFFFFFFFF88800000FFFFFFFFFFFFFFFFFFFFFFFF 88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF 88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF 88880800FFFFFFFFFFFFFFFFFFFFFFFF88880800FFFFFFFFFFFFFFFFFFFFFFFF 88880800FFFFFFFFFFFFFFFFFFFFFFFF88880800FFFFFFFFFFFFFFFFFFFFFFFF F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF F880800FFFFFFFFFFFFFFFFFFFFFFFFFF880800FFFFFFFFFFFFFFFFFFFFFFFFF F880800FFFFFFFFFFFFFFFFFFFFFFFFFF880800FFFFFFFFFFFFFFFFFFFFFFFFF F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF FF8080FFFFFFFFFFFFFFFFFFFFFFFFFFFF8080FFFFFFFFFFFFFFFFFFFFFFFFFF FF8080FFFFFFFFFFFFFFFFFFFFFFFFFFFF8080FFFFFFFFFFFFFFFFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF 08000000FFFFFFFFFFFFFFFFFFFFFFFF08000000FFFFFFFFFFFFFFFFFFFFFFFF 08000000FFFFFFFFFFFFFFFFFFFFFFFF08000000FFFFFFFFFFFFFFFFFFFFF880 00000000000FFFFFFFFFFFFFFFFFF88000000000000FFFFFFFFFFFFFFFFFF880 00000000000FFFFFFFFFFFFFFFFFF88000000000000FFFFFFFFFFFFFFFF80000 EEEEEEEE88800FFFFFFFFFFFFFF800009999999988800FFFFFFFFFFFFFF80000 9999999988800FFFFFFFFFFFFFF800009999999988800FFFFFFFFFFFFF000EEE EEEEEEEEEEE800FFFFFFFFFFFF00099999999999999800FFFFFFFFFFFF000999 99999999999800FFFFFFFFFFFF00099999999999999800FFFFFFFFFFF000EEEE EEEEEEEEEEEE800FFFFFFFFFF0009999999999999999800FFFFFFFFFF0009999 999999999999800FFFFFFFFFF0009999999999999999800FFFFFFFFFF00EEEEE EEEEEEEEEEEEE80FFFFFFFFFF0099999999999999999980FFFFFFFFFF0099999 999999999999980FFFFFFFFFF0099999999999999999980FFFFFFFFF80EEEEEE EEEEEEEEEEEEEE00FFFFFFFF809999999999999999999900FFFFFFFF80999999 9999999999999900FFFFFFFF809999999999999999999900FFFFFFFF80EEEEEE EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999 9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999 9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999 9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999 9999999999999980FFFFFFFF809999999999999999999980FFFFFFFFF00EEEEE EEEEEEEEEEEEE80FFFFFFFFFF0099999999999999999980FFFFFFFFFF0099999 999999999999980FFFFFFFFFF0099999999999999999980FFFFFFFFFF800EEEE EEEEEEEEEEEE800FFFFFFFFFF8009999999999999999800FFFFFFFFFF8009999 999999999999800FFFFFFFFFF8009999999999999999800FFFFFFFFFFF800EEE EEEEEEEEEEE800FFFFFFFFFFFF80099999999999999800FFFFFFFFFFFF800999 99999999999800FFFFFFFFFFFF80099999999999999800FFFFFFFFFFFFF800EE EEEEEEEEEE800FFFFFFFFFFFFFF800999999999999800FFFFFFFFFFFFFF80099 9999999999800FFFFFFFFFFFFFF800999999999999800FFFFFFFFFFFFFFF8880 0EEEEEE08000FFFFFFFFFFFFFFFF8880099999908000FFFFFFFFFFFFFFFF8880 099999908000FFFFFFFFFFFFFFFF8880099999908000FFFFFFFFFFFFFFFFFF80 0080000000FFFFFFFFFFFFFFFFFFFF800080000000FFFFFFFFFFFFFFFFFFFF80 0080000000FFFFFFFFFFFFFFFFFFFF800080000000FFFFFFFFFFFFFFFFFFFFFF F800000FFFFFFFFFFFFFFFFFFFFFFFFFF800000FFFFFFFFFFFFFFFFFFFFFFFFF F800000FFFFFFFFFFFFFFFFFFFFFFFFFF800000FFFFFFFFFFFFF} Layout = blGlyphTop NumGlyphs = 4 ParentShowHint = False ShowHint = True OnClick = BtLoupeClick end object BtAbout: TButton Left = 157 Top = 71 Width = 72 Height = 28 Hint = 'Copyright notice' Caption = 'A&bout' ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = False OnClick = BtAboutClick end object BtHelp: TBitBtn Left = 242 Top = 31 Width = 72 Height = 28 Hint = 'Frequently asked questions' ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = BtHelpClick Kind = bkHelp end object BtSetup: TButton Left = 157 Top = 31 Width = 72 Height = 28 Hint = 'On the desktop, in the start menu' Caption = 'Shortcuts' ParentShowHint = False ShowHint = True TabOrder = 2 TabStop = False OnClick = BtSetupClick end object BtExit: TBitBtn Left = 242 Top = 71 Width = 72 Height = 28 Hint = 'To quit the program' Caption = 'E&xit' ParentShowHint = False ShowHint = True TabOrder = 3 TabStop = False OnClick = BtExitClick Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000001000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8 F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404 0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303 03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8 F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303 F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303 03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04 0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD 05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303 03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03 03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303 03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807 F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303 F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303 03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303 0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000 000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303 00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303 03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303 03FF} NumGlyphs = 2 end object BtConfig: TButton Left = 72 Top = 31 Width = 72 Height = 28 Hint = 'Accuracy, subdivisions, metric/imperial' Caption = 'Configuration' ParentShowHint = False ShowHint = True TabOrder = 4 TabStop = False OnClick = BtConfigClick end object BtSetupPrn: TButton Left = 72 Top = 71 Width = 72 Height = 28 Hint = 'Paper size, printer properties' Caption = 'Printer setup' ParentShowHint = False ShowHint = True TabOrder = 5 TabStop = False OnClick = BtSetupPrnClick end end object PanelPrintingPage: TPanel Left = 425 Top = 334 Width = 164 Height = 97 TabOrder = 27 object Shape10: TShape Left = 1 Top = 1 Width = 162 Height = 20 Align = alTop Brush.Color = clNavy end object Label31: TLabel Left = 34 Top = 4 Width = 97 Height = 13 Caption = 'Printable surface' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Shape8: TShape Left = 28 Top = 31 Width = 108 Height = 36 Brush.Color = clInfoBk end object LblWPaper: TLabel Left = 34 Top = 34 Width = 53 Height = 13 Caption = 'LblWPaper' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object LblHPaper: TLabel Left = 35 Top = 50 Width = 50 Height = 13 Caption = 'LblHPaper' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object RBPortrait: TRadioButton Left = 14 Top = 73 Width = 55 Height = 17 Caption = 'Portrait' Checked = True TabOrder = 0 TabStop = True OnClick = RBOrientClick end object RBLandscape: TRadioButton Tag = 1 Left = 78 Top = 73 Width = 75 Height = 17 Caption = 'Landscape' TabOrder = 1 OnClick = RBOrientClick end end object PanelOutPut: TPanel Left = 589 Top = 334 Width = 165 Height = 97 TabOrder = 28 object Shape11: TShape Left = 1 Top = 1 Width = 163 Height = 20 Align = alTop Brush.Color = clNavy end object Label32: TLabel Left = 63 Top = 4 Width = 39 Height = 13 Caption = 'Output' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object BtImprimer: TSpeedButton Left = 88 Top = 42 Width = 67 Height = 34 Hint = 'Default printer' Caption = '&Print' Glyph.Data = { 96090000424D9609000000000000360000002800000028000000140000000100 1800000000006009000000000000000000000000000000000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFF FFFFFFFFFFFFFF007F7F007F7F007F7F000000000000000000007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000000000000000 007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F7F7F7F7F7F7FFFFFFFFF FFFF007F7F000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000007F7F007F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFFFF007F7F000000 FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000007F7F007F7F7F7F7FFFFFFF00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F000000FFFFFFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBF000000007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F7F7F7FFFFFFF007F7F000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000FF0000FFBFBFBFBFBFBF 000000007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFF FFFF007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F 7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7FFFFFFF007F7F7F7F7F 0000000000007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F0000000000007F7F7F007F7F007F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F007F7F007F7F007F7F0000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 7FFFFFFF007F7F007F7F007F7F007F7F007F7F000000000000FFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000007F7F 007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7FFFFFFF007F7FFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F7F7F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F000000FFFFFF000000000000000000000000 000000000000000000000000FFFFFF000000007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F7F7F7FFFFFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F 007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F7F7F7FFFFFFF007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F0000 00FFFFFF000000000000000000000000000000000000000000000000FFFFFF00 0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F7F7F7FFFFF FF007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7FFFFFFFFFFF FF007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F000000FFFFFF000000000000FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F7F7F7FFFFFFF7F7F7F7F7F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F 007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F0000 0000000000000000000000000000000000000000000000000000000000000000 0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = BtImprimerClick end object BtCopy: TButton Left = 10 Top = 27 Width = 67 Height = 29 Hint = 'Clipboard' Caption = '&Copy' ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = False OnClick = BtCopyClick end object BtSaveToFile: TButton Left = 9 Top = 61 Width = 67 Height = 29 Hint = 'Metafile (*.emf)' Caption = '&Save' ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = BtSaveToFileClick end end object PanelCart: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 3 Visible = False object GroupBox1: TGroupBox Left = 7 Top = 13 Width = 153 Height = 108 Caption = ' Abscissa ' TabOrder = 0 object Label2: TLabel Left = 4 Top = 32 Width = 27 Height = 13 Caption = 'Scale' end object Label3: TLabel Left = 4 Top = 71 Width = 42 Height = 13 Caption = 'Divisions' end object CBXScale: TComboBox Left = 50 Top = 27 Width = 95 Height = 21 Style = csDropDownList DropDownCount = 10 ItemHeight = 13 TabOrder = 0 OnChange = CBCartScaleChange end object CBXDiv: TComboBox Left = 50 Top = 68 Width = 95 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = RefreshPreview end object EditXDiv: TEdit Left = 50 Top = 68 Width = 44 Height = 21 MaxLength = 3 TabOrder = 2 Text = '31' OnKeyPress = EditDiagramKeyPress end object BtApplyXDiv: TButton Left = 102 Top = 69 Width = 41 Height = 21 Caption = 'Apply' TabOrder = 3 TabStop = False OnClick = BtApplyDiagramClick end end object GroupBox2: TGroupBox Left = 166 Top = 13 Width = 153 Height = 108 Caption = ' Ordinate ' TabOrder = 1 object Label6: TLabel Left = 4 Top = 32 Width = 27 Height = 13 Caption = 'Scale' end object Label19: TLabel Left = 4 Top = 71 Width = 42 Height = 13 Caption = 'Divisions' end object CBYScale: TComboBox Tag = 1 Left = 50 Top = 27 Width = 95 Height = 21 Style = csDropDownList DropDownCount = 10 ItemHeight = 13 TabOrder = 0 OnChange = CBCartScaleChange end object CBYDiv: TComboBox Tag = 1 Left = 50 Top = 68 Width = 95 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = RefreshPreview end object EditYDiv: TEdit Tag = 1 Left = 50 Top = 68 Width = 44 Height = 21 MaxLength = 3 TabOrder = 2 Text = '31' OnKeyPress = EditDiagramKeyPress end object BtApplyYDiv: TButton Tag = 1 Left = 102 Top = 69 Width = 41 Height = 21 Caption = 'Apply' TabOrder = 3 TabStop = False OnClick = BtApplyDiagramClick end end object CBSubDivCart: TCheckBox Left = 120 Top = 130 Width = 87 Height = 17 Caption = 'Sub-divisions' Checked = True State = cbChecked TabOrder = 2 OnClick = CBSubdivClick end object CBStaggeredDots: TCheckBox Left = 127 Top = 129 Width = 97 Height = 17 Caption = 'Staggered dots' TabOrder = 3 OnClick = RefreshPreview end end object PanelBee: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 6 Visible = False object GroupBox9: TGroupBox Left = 56 Top = 25 Width = 213 Height = 99 Caption = ' Pattern ' TabOrder = 0 object LblUnitBee: TLabel Left = 177 Top = 26 Width = 23 Height = 13 Caption = 'unite' end object Label35: TLabel Left = 12 Top = 26 Width = 65 Height = 13 Caption = 'Width of motif' end object EditDiamBee: TEdit Tag = 7 Left = 89 Top = 23 Width = 78 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object BtApplyDiamBee: TButton Tag = 7 Left = 89 Top = 59 Width = 78 Height = 25 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyDiagramClick end end end object PanelTri: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 7 Visible = False object GroupBox11: TGroupBox Left = 50 Top = 38 Width = 225 Height = 74 Caption = ' Side scale ' TabOrder = 0 object LblScales: TLabel Left = 24 Top = 33 Width = 42 Height = 13 Caption = 'Divisions' FocusControl = CBDivTri end object CBDivTri: TComboBox Left = 80 Top = 27 Width = 120 Height = 21 Style = csDropDownList Color = clWhite DropDownCount = 11 ItemHeight = 13 TabOrder = 0 OnChange = RefreshPreview end end end object PanelMerc: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 8 Visible = False object GroupBox18: TGroupBox Left = 26 Top = 23 Width = 273 Height = 105 Caption = ' Geometry ' TabOrder = 0 object Label50: TLabel Left = 17 Top = 32 Width = 79 Height = 13 Caption = 'P&arallels spacing' FocusControl = CBYDivMerc end object Label49: TLabel Left = 16 Top = 63 Width = 84 Height = 13 Caption = 'Lat&itude (0 to 80�)' FocusControl = EditLatitude end object CBYDivMerc: TComboBox Left = 121 Top = 24 Width = 134 Height = 21 Style = csDropDownList Color = clWhite DropDownCount = 11 ItemHeight = 13 TabOrder = 0 OnChange = RefreshPreview end object EditLatitude: TEdit Tag = 6 Left = 122 Top = 57 Width = 73 Height = 21 TabOrder = 1 Text = 'EditLatitude' OnKeyPress = EditDiagramKeyPress end object BtApplyLatitude: TButton Tag = 6 Left = 207 Top = 57 Width = 49 Height = 23 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end end end object PanelMusic: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 9 Visible = False object Label38: TLabel Left = 24 Top = 63 Width = 64 Height = 13 Caption = 'Staves/score' end object Label39: TLabel Left = 25 Top = 87 Width = 46 Height = 13 Caption = 'Bars/staff' end object Bevel1: TBevel Left = 6 Top = 51 Width = 155 Height = 95 Shape = bsFrame end object SEStavesOnScore: TSpinEdit Left = 95 Top = 57 Width = 41 Height = 22 EditorEnabled = False MaxValue = 20 MinValue = 1 TabOrder = 1 Value = 4 OnChange = SEStavesOnScoreChange end object SEBars: TSpinEdit Left = 95 Top = 84 Width = 41 Height = 22 EditorEnabled = False MaxValue = 20 MinValue = 0 TabOrder = 2 Value = 4 OnChange = SEBarsChange end object GroupBox7: TGroupBox Left = 166 Top = 0 Width = 152 Height = 147 Caption = ' Distances ' TabOrder = 4 object Label41: TLabel Left = 12 Top = 25 Width = 76 Height = 13 Caption = 'Between scores' end object LblStaff12: TLabel Left = 12 Top = 57 Width = 68 Height = 13 Caption = 'Staff 1- Staff 2' end object LblOtherStaves: TLabel Left = 12 Top = 88 Width = 78 Height = 13 Caption = 'Following staves' end object Label4: TLabel Left = 29 Top = 112 Width = 93 Height = 13 Caption = 'Unit = 1 lines space' end object SEDistScores: TSpinEdit Left = 98 Top = 20 Width = 41 Height = 22 EditorEnabled = False MaxValue = 50 MinValue = 2 TabOrder = 0 Value = 4 OnChange = RefreshPreview end object SEStave12: TSpinEdit Left = 98 Top = 51 Width = 41 Height = 22 EditorEnabled = False MaxValue = 40 MinValue = 2 TabOrder = 1 Value = 7 OnChange = RefreshPreview end object SEStave23: TSpinEdit Left = 98 Top = 82 Width = 41 Height = 22 EditorEnabled = False MaxValue = 20 MinValue = 2 TabOrder = 2 Value = 3 OnChange = RefreshPreview end end object GroupBox8: TGroupBox Left = 6 Top = 0 Width = 155 Height = 46 Caption = ' Space between lines ' TabOrder = 0 object LblUnitMusic: TLabel Left = 72 Top = 23 Width = 14 Height = 13 Caption = 'cm' end object EditEcLiMus: TEdit Tag = 10 Left = 12 Top = 18 Width = 56 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object BtApplyMusic: TButton Tag = 10 Left = 105 Top = 19 Width = 37 Height = 22 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyDiagramClick end end object PanelKeyMusic: TPanel Left = 9 Top = 104 Width = 150 Height = 41 BevelOuter = bvNone TabOrder = 3 object Label7: TLabel Left = 3 Top = 3 Width = 49 Height = 13 Caption = 'Space for ' end object Label90: TLabel Left = 4 Top = 16 Width = 63 Height = 13 Caption = 'key signature' end object Label91: TLabel Left = 73 Top = 26 Width = 6 Height = 13 Caption = '0' end object Label92: TLabel Left = 106 Top = 26 Width = 6 Height = 13 Caption = '5' end object Label93: TLabel Left = 136 Top = 26 Width = 12 Height = 13 Caption = '10' end object TBKeyMusic: TTrackBar Left = 69 Top = 6 Width = 81 Height = 20 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 12 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = RefreshPreview end end end object PanelWei: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 15 TabStop = True Visible = False object GroupBox20: TGroupBox Left = 7 Top = 2 Width = 312 Height = 44 Caption = ' Abscissa ' TabOrder = 0 object Label37: TLabel Left = 63 Top = 16 Width = 84 Height = 13 Caption = 'Range of lifetimes' FocusControl = CBXDivWeib end object CBXDivWeib: TComboBox Left = 158 Top = 13 Width = 90 Height = 21 ItemHeight = 13 TabOrder = 0 OnChange = RefreshPreview end end object GroupBox22: TGroupBox Left = 7 Top = 74 Width = 312 Height = 73 Caption = ' Additional features ' TabOrder = 1 object CBMoreAxesWeib: TCheckBox Left = 9 Top = 19 Width = 294 Height = 17 Caption = 'Axes to calculate the Weibull scale and shape parameters' TabOrder = 0 OnClick = RefreshPreview end object CBMedianRanks: TCheckBox Left = 9 Top = 45 Width = 118 Height = 17 Caption = 'Median ranks scale' TabOrder = 1 OnClick = CBMedianRanksClick end object PanelNWeibull: TPanel Left = 185 Top = 40 Width = 121 Height = 28 BevelOuter = bvNone TabOrder = 2 object Label99: TLabel Left = 39 Top = 8 Width = 29 Height = 13 Caption = 'Points' FocusControl = EditNbPtWeib end object EditNbPtWeib: TEdit Tag = 3 Left = 3 Top = 4 Width = 32 Height = 21 TabOrder = 0 Text = '100' OnKeyPress = EditDiagramKeyPress end object BtApplyNbWeibull: TButton Tag = 3 Left = 76 Top = 4 Width = 42 Height = 21 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyDiagramClick end end end object CBSubDivWeib: TCheckBox Left = 101 Top = 53 Width = 123 Height = 17 Caption = 'Sub-divisions of axes' Checked = True State = cbChecked TabOrder = 2 OnClick = CBSubdivClick end end object PanelAxo: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 11 Visible = False object Label44: TLabel Left = 65 Top = 15 Width = 90 Height = 13 Caption = 'Horizontal divisions' end object CBXDivAxo: TComboBox Left = 167 Top = 11 Width = 93 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = RefreshPreview end object GBAnglesPerspective: TGroupBox Left = 7 Top = 42 Width = 159 Height = 105 Caption = ' Perspective angles ' TabOrder = 1 object Label46: TLabel Left = 12 Top = 27 Width = 18 Height = 13 Caption = 'Left' end object Label47: TLabel Left = 11 Top = 59 Width = 25 Height = 13 Caption = 'Right' end object Label45: TLabel Left = 36 Top = 80 Width = 86 Height = 13 Caption = '(15 to 60 degrees)' end object EditLeftAngle: TEdit Tag = 4 Left = 44 Top = 24 Width = 41 Height = 21 TabOrder = 0 Text = 'EditLeftAngle' OnKeyPress = EditDiagramKeyPress end object EditRightAngle: TEdit Tag = 4 Left = 45 Top = 52 Width = 41 Height = 21 TabOrder = 1 Text = 'EditRightAngle' OnKeyPress = EditDiagramKeyPress end object BtApplyAxo: TButton Tag = 4 Left = 97 Top = 36 Width = 52 Height = 25 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end end object GBVLinesAxo: TGroupBox Left = 175 Top = 56 Width = 141 Height = 71 Caption = ' Vertical lines ' TabOrder = 2 object Label48: TLabel Left = 7 Top = 48 Width = 128 Height = 13 Caption = '(not shown on the preview)' end object RBWithAxoV: TRadioButton Left = 13 Top = 24 Width = 43 Height = 17 Caption = 'With' TabOrder = 0 OnClick = RBAxoVClick end object RBWithoutAxoV: TRadioButton Left = 69 Top = 24 Width = 61 Height = 17 Caption = 'Without' TabOrder = 1 OnClick = RBAxoVClick end end end object PanelLogit: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 12 TabStop = True Visible = False object Label52: TLabel Left = 40 Top = 46 Width = 72 Height = 13 Caption = 'Abscissa range' FocusControl = CBXDivLogit end object CBXDivLogit: TComboBox Left = 134 Top = 43 Width = 105 Height = 21 ItemHeight = 13 TabOrder = 0 OnChange = RefreshPreview end object CBSubDivLogit: TCheckBox Left = 119 Top = 90 Width = 87 Height = 17 Caption = 'Sub-divisions' Checked = True State = cbChecked TabOrder = 1 OnClick = CBSubdivClick end end object PanelBrick: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 17 Visible = False object GroupBox13: TGroupBox Left = 33 Top = 16 Width = 259 Height = 118 Caption = ' Bricks' TabOrder = 0 object LblUnitHBrick: TLabel Left = 142 Top = 29 Width = 23 Height = 13 Caption = 'unite' end object Label56: TLabel Left = 14 Top = 61 Width = 28 Height = 13 Caption = 'Width' end object LblUnitWBrick: TLabel Left = 142 Top = 61 Width = 25 Height = 13 Caption = 'Unite' end object Label43: TLabel Left = 13 Top = 28 Width = 31 Height = 13 Caption = 'Height' end object EditHBrick: TEdit Tag = 11 Left = 52 Top = 24 Width = 80 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object EditWBrick: TEdit Tag = 12 Left = 53 Top = 55 Width = 80 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end object BtApplyBrick: TButton Tag = 11 Left = 182 Top = 40 Width = 61 Height = 21 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end object RBBrickAligned: TRadioButton Left = 60 Top = 89 Width = 57 Height = 17 Caption = 'Aligned' TabOrder = 3 OnClick = RefreshPreview end object RBBrickStaggered: TRadioButton Left = 148 Top = 89 Width = 73 Height = 17 Caption = 'Staggered' TabOrder = 4 OnClick = RefreshPreview end end end object PanelLosange: TPanel Tag = 13 Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 14 Visible = False object GroupBox10: TGroupBox Left = 56 Top = 11 Width = 213 Height = 128 Caption = ' Diamonds ' TabOrder = 0 object Label57: TLabel Left = 12 Top = 28 Width = 31 Height = 13 Caption = 'Height' end object LblUnitHLosange: TLabel Left = 146 Top = 29 Width = 23 Height = 13 Caption = 'unite' end object Label63: TLabel Left = 12 Top = 60 Width = 28 Height = 13 Caption = 'Width' end object LblUnitWLosange: TLabel Left = 147 Top = 61 Width = 25 Height = 13 Caption = 'Unite' end object EditHLosange: TEdit Tag = 16 Left = 66 Top = 24 Width = 70 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object EditWLosange: TEdit Tag = 17 Left = 66 Top = 56 Width = 70 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end object BtApplyLosange: TButton Tag = 16 Left = 67 Top = 90 Width = 70 Height = 21 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end end end object PanelclPat: TPanel Left = 426 Top = 212 Width = 326 Height = 72 BevelOuter = bvNone TabOrder = 23 Visible = False object GroupBox6: TGroupBox Left = 7 Top = 2 Width = 312 Height = 68 Caption = ' Line ' TabOrder = 0 object ShapeColorPat: TShape Left = 278 Top = 16 Width = 20 Height = 10 Shape = stEllipse end object Label64: TLabel Left = 246 Top = 13 Width = 24 Height = 13 Caption = 'Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LblWPat3: TLabel Left = 202 Top = 45 Width = 18 Height = 13 Alignment = taCenter AutoSize = False Caption = '100' end object LblWPat2: TLabel Left = 141 Top = 45 Width = 17 Height = 13 Alignment = taCenter AutoSize = False Caption = '50' end object LblWPat1: TLabel Left = 74 Top = 45 Width = 19 Height = 13 Alignment = taCenter AutoSize = False Caption = '1' end object LblUnitPat: TLabel Left = 11 Top = 42 Width = 46 Height = 13 AutoSize = False Caption = 'Unit' end object Label66: TLabel Left = 14 Top = 22 Width = 28 Height = 13 Caption = 'Width' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object BtChangeColorPat: TButton Left = 249 Top = 34 Width = 48 Height = 24 Hint = 'Color of pattern' Caption = 'Ch&ange' ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = False OnClick = BtChangeColorPatClick end object TBPat: TTrackBar Left = 72 Top = 17 Width = 150 Height = 29 LineSize = 10 Max = 100 Min = 1 Orientation = trHorizontal PageSize = 10 Frequency = 10 Position = 50 SelEnd = 0 SelStart = 0 TabOrder = 1 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBPatChange end end end object PanelTable: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 18 Visible = False object GroupBox16: TGroupBox Left = 7 Top = 1 Width = 312 Height = 41 Caption = ' Rows ' TabOrder = 0 object Label24: TLabel Left = 7 Top = 16 Width = 37 Height = 13 Caption = 'Number' end object LblHRows: TLabel Left = 143 Top = 15 Width = 49 Height = 13 Caption = 'LblHRows' end object Label36: TLabel Left = 103 Top = 15 Width = 40 Height = 13 Caption = 'Height : ' end object SERows: TSpinEdit Left = 53 Top = 11 Width = 42 Height = 22 EditorEnabled = False MaxValue = 50 MinValue = 2 TabOrder = 0 Value = 2 OnChange = SERowsChange end end object GroupBox17: TGroupBox Left = 7 Top = 44 Width = 312 Height = 105 Caption = ' Columns ' TabOrder = 1 object Label51: TLabel Left = 5 Top = 18 Width = 37 Height = 13 Caption = 'Number' end object Label34: TLabel Left = 5 Top = 67 Width = 279 Height = 13 Caption = 'To widen or narrow a column, left-click on one of its border ' end object Label40: TLabel Left = 17 Top = 82 Width = 172 Height = 13 Caption = 'and move the line gliding the mouse.' end object Label53: TLabel Left = 6 Top = 45 Width = 288 Height = 13 Caption = 'To select/unselect a column, rigth-click on it (yellow flagged).' end object SECols: TSpinEdit Left = 49 Top = 14 Width = 44 Height = 22 EditorEnabled = False MaxValue = 0 MinValue = 2 TabOrder = 0 Value = 2 OnChange = SEColsChange end object BtEqualizeCols: TButton Left = 100 Top = 14 Width = 134 Height = 22 Caption = 'Equalize selected columns' TabOrder = 1 TabStop = False OnClick = BtEqualColumnsClick end object BtUnselectCols: TButton Left = 242 Top = 14 Width = 65 Height = 22 Caption = 'Unselect all' TabOrder = 2 TabStop = False OnClick = BtUnselectColsClick end end end object PanelEllipse: TPanel Tag = 13 Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone Caption = 'PanelEllipse' TabOrder = 16 Visible = False object GroupBox19: TGroupBox Left = 7 Top = 11 Width = 312 Height = 128 Caption = ' Motif ' TabOrder = 0 object Label54: TLabel Left = 23 Top = 28 Width = 31 Height = 13 Caption = 'Height' end object LblUnitHEllipse: TLabel Left = 157 Top = 29 Width = 23 Height = 13 Caption = 'unite' end object Label59: TLabel Left = 23 Top = 60 Width = 28 Height = 13 Caption = 'Width' end object LblUnitWEllipse: TLabel Left = 158 Top = 61 Width = 25 Height = 13 Caption = 'Unite' end object EditHEllipse: TEdit Tag = 13 Left = 77 Top = 24 Width = 70 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object EditWEllipse: TEdit Tag = 14 Left = 77 Top = 56 Width = 70 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end object BtApplyEllipse: TButton Tag = 13 Left = 209 Top = 42 Width = 70 Height = 21 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end object RBEllipseCrossed: TRadioButton Left = 75 Top = 96 Width = 65 Height = 17 Caption = 'Crossed' TabOrder = 3 OnClick = RefreshPreview end object RBEllipseTangent: TRadioButton Left = 171 Top = 96 Width = 65 Height = 17 Caption = 'Tangent' TabOrder = 4 OnClick = RefreshPreview end end end object PanelclDot: TPanel Left = 426 Top = 212 Width = 326 Height = 72 BevelOuter = bvNone Caption = 'PanelclDot' TabOrder = 25 Visible = False object GroupBox5: TGroupBox Left = 7 Top = 2 Width = 312 Height = 68 Caption = ' Dots ' TabOrder = 0 object Label58: TLabel Left = 12 Top = 21 Width = 42 Height = 13 Caption = 'Diameter' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LblDiamDot1: TLabel Left = 76 Top = 45 Width = 17 Height = 13 Alignment = taCenter AutoSize = False Caption = '50' end object LblDiamDot2: TLabel Left = 137 Top = 45 Width = 21 Height = 13 Alignment = taCenter AutoSize = False Caption = '100' end object LblDiamDot3: TLabel Left = 201 Top = 45 Width = 21 Height = 13 Alignment = taCenter AutoSize = False Caption = '150' end object LblUnitDot: TLabel Left = 13 Top = 42 Width = 19 Height = 13 Caption = 'Unit' end object Label67: TLabel Left = 246 Top = 13 Width = 24 Height = 13 Caption = 'Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ShapeColorDot: TShape Left = 278 Top = 16 Width = 20 Height = 10 Shape = stEllipse end object TBDot: TTrackBar Left = 72 Top = 17 Width = 150 Height = 28 LineSize = 5 Max = 100 Min = 50 Orientation = trHorizontal PageSize = 5 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBDotChange end object BtChangeColorDot: TButton Left = 249 Top = 34 Width = 48 Height = 20 Hint = 'Color of dots' Caption = 'Ch&ange' ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = BtChangeColorDotClick end end end object PanelGuitar: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 10 Visible = False object GBGuitar: TGroupBox Left = 7 Top = 11 Width = 312 Height = 127 Caption = 'Strings' TabOrder = 0 object LblUnitGuitar: TLabel Left = 86 Top = 67 Width = 14 Height = 13 Caption = 'cm' end object Label69: TLabel Left = 46 Top = 67 Width = 37 Height = 13 Caption = 'Unit = 1' end object Label5: TLabel Left = 104 Top = 21 Width = 37 Height = 13 Caption = 'Number' end object Label55: TLabel Left = 26 Top = 54 Width = 119 Height = 13 Caption = 'Distance between strings' end object Label62: TLabel Left = 46 Top = 106 Width = 97 Height = 13 Caption = 'Unit = 1 string space' end object Label60: TLabel Left = 26 Top = 93 Width = 120 Height = 13 Caption = 'Distance between staves' end object EditEcCords: TEdit Tag = 22 Left = 155 Top = 56 Width = 70 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end object BtApplyGuitar: TButton Tag = 22 Left = 242 Top = 57 Width = 44 Height = 22 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end object SEDistStaves: TSpinEdit Left = 157 Top = 95 Width = 41 Height = 22 EditorEnabled = False MaxValue = 20 MinValue = 2 TabOrder = 3 Value = 4 OnChange = RefreshPreview end object SENCords: TSpinEdit Left = 155 Top = 17 Width = 41 Height = 22 EditorEnabled = False MaxValue = 8 MinValue = 4 TabOrder = 0 Value = 6 OnChange = RefreshPreview end end end object PanelNomCurPaper: TPanel Left = 444 Top = 33 Width = 179 Height = 21 Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 31 end object BtChangePaper: TBitBtn Left = 639 Top = 33 Width = 101 Height = 21 Caption = 'Change &variant' TabOrder = 2 OnClick = BtChangePaperClick Glyph.Data = { AE000000424DAE0000000000000076000000280000000D000000070000000100 0400000000003800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFF0FFFFF F000FFFFF000FFFFF000FFFF00000FFFF000FFF0000000FFF000FF000000000F F000F00000000000F0000000000000000000} end object PanelEditing: TPanel Left = 432 Top = 28 Width = 316 Height = 34 BevelOuter = bvNone BorderWidth = 1 Caption = 'PanelEditing' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 32 Visible = False object Shape13: TShape Left = 13 Top = 6 Width = 289 Height = 20 end object LblEditing: TLabel Left = 19 Top = 9 Width = 278 Height = 15 Alignment = taCenter AutoSize = False Caption = 'LblEditing' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end end object PanelHandWriting: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 20 Visible = False object GBPairedLines: TGroupBox Left = 7 Top = 7 Width = 312 Height = 52 Caption = ' Distances between horizontal lines ' TabOrder = 0 object Label22: TLabel Left = 12 Top = 23 Width = 54 Height = 13 Caption = 'Paired lines' end object Label42: TLabel Left = 154 Top = 23 Width = 70 Height = 13 Caption = 'Groups of lines' end object LblUnitHandWri1: TLabel Left = 120 Top = 23 Width = 3 Height = 13 Caption = '-' end object LblUnitHandWri2: TLabel Left = 279 Top = 23 Width = 3 Height = 13 Caption = '-' end object EditDistPair: TEdit Tag = 23 Left = 69 Top = 20 Width = 46 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object EditDistGroup: TEdit Tag = 24 Left = 228 Top = 20 Width = 46 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end end object CBObliques: TCheckBox Left = 68 Top = 123 Width = 111 Height = 17 Caption = 'Show inclined lines' Checked = True State = cbChecked TabOrder = 3 OnClick = CBObliquesClick end object GBInclinedLines: TGroupBox Left = 7 Top = 63 Width = 312 Height = 52 Caption = ' Inclined lines ' TabOrder = 2 object Label61: TLabel Left = 8 Top = 23 Width = 70 Height = 13 Caption = 'Horiz. distance' end object Label65: TLabel Left = 187 Top = 23 Width = 27 Height = 13 Caption = 'Angle' end object Label68: TLabel Left = 268 Top = 23 Width = 38 Height = 13 Caption = 'degrees' end object LblUnitHandWri3: TLabel Left = 138 Top = 23 Width = 3 Height = 13 Caption = '-' end object EditDistObl: TEdit Tag = 25 Left = 83 Top = 19 Width = 50 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object EditAngleObl: TEdit Tag = 26 Left = 222 Top = 19 Width = 41 Height = 21 TabOrder = 1 OnKeyPress = EditDiagramKeyPress end end object BtApplyPair: TButton Tag = 23 Left = 190 Top = 122 Width = 53 Height = 21 Caption = 'Apply' TabOrder = 4 TabStop = False OnClick = BtApplyDiagramClick end object GBSingleLines: TGroupBox Left = 7 Top = 7 Width = 312 Height = 52 Caption = 'Horizontal lines ' TabOrder = 1 object Label70: TLabel Left = 62 Top = 23 Width = 73 Height = 13 Caption = 'Vertic. distance' end object LblUnitHandWri4: TLabel Left = 193 Top = 23 Width = 3 Height = 13 Caption = '-' end object EditDistSingle: TEdit Tag = 27 Left = 142 Top = 20 Width = 46 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end end end object PanelLines: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone Caption = 'PanelLines' TabOrder = 13 Visible = False object GroupBox12: TGroupBox Left = 41 Top = 27 Width = 245 Height = 96 Caption = ' Pattern ' TabOrder = 0 object Label20: TLabel Left = 9 Top = 28 Width = 99 Height = 13 Caption = 'Space between lines' end object LblUnitLinePattern: TLabel Left = 200 Top = 28 Width = 19 Height = 13 Caption = 'Unit' end object EditLines: TEdit Tag = 15 Left = 118 Top = 23 Width = 75 Height = 21 MaxLength = 8 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object BtApplyLines: TButton Tag = 15 Left = 119 Top = 59 Width = 75 Height = 21 Caption = 'Apply' TabOrder = 1 TabStop = False OnClick = BtApplyDiagramClick end end end object PanelOvalShape: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 26 Visible = False object Label71: TLabel Left = 88 Top = 40 Width = 73 Height = 13 Caption = 'Radial divisions' end object CBAngleEllipse: TComboBox Left = 88 Top = 72 Width = 145 Height = 21 Style = csDropDownList DropDownCount = 10 ItemHeight = 13 Items.Strings = ( '5 degrees' '6 degrees' '9 degrees' '10 degrees' '15 degrees' '30 degrees' '45 degrees' '60 degrees' '90 degrees' 'Absent') TabOrder = 0 OnChange = RefreshPreview end end object PanelNotch: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 21 Visible = False object Label72: TLabel Left = 21 Top = 9 Width = 81 Height = 13 Caption = 'Width of notches' end object LblUnitNotch: TLabel Left = 199 Top = 8 Width = 3 Height = 13 Caption = '-' end object EditWNotch: TEdit Tag = 28 Left = 112 Top = 4 Width = 80 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object GroupBox14: TGroupBox Left = 7 Top = 35 Width = 312 Height = 112 Caption = ' Spaces between notches ' TabOrder = 1 object Label74: TLabel Left = 12 Top = 24 Width = 47 Height = 13 Caption = 'Horizontal' end object Label75: TLabel Left = 15 Top = 72 Width = 35 Height = 13 Caption = 'Vertical' end object Label76: TLabel Left = 222 Top = 25 Width = 63 Height = 13 Caption = 'x notch width' end object Label77: TLabel Left = 222 Top = 71 Width = 67 Height = 13 Caption = 'x notch height' end object Label78: TLabel Left = 75 Top = 48 Width = 6 Height = 13 Caption = '0' end object Label79: TLabel Left = 77 Top = 96 Width = 6 Height = 13 Caption = '1' end object Label80: TLabel Left = 201 Top = 96 Width = 12 Height = 13 Caption = '10' end object Label81: TLabel Left = 198 Top = 48 Width = 15 Height = 13 Caption = '1.0' end object Label82: TLabel Left = 134 Top = 48 Width = 15 Height = 13 Caption = '0.5' end object Label83: TLabel Left = 133 Top = 96 Width = 6 Height = 13 Caption = '5' end object TBNotchVertic: TTrackBar Left = 69 Top = 68 Width = 150 Height = 27 Min = 1 Orientation = trHorizontal Frequency = 1 Position = 2 SelEnd = 0 SelStart = 0 TabOrder = 1 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = RefreshPreview end object TBNotchHoriz: TTrackBar Left = 67 Top = 20 Width = 150 Height = 27 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = RefreshPreview end end object BtApplyNotch: TButton Tag = 28 Left = 255 Top = 4 Width = 47 Height = 22 Caption = 'Apply' TabOrder = 2 TabStop = False OnClick = BtApplyDiagramClick end end object PanelPercus: TPanel Left = 426 Top = 62 Width = 326 Height = 150 BevelOuter = bvNone TabOrder = 22 Visible = False object Label84: TLabel Left = 16 Top = 16 Width = 117 Height = 13 Caption = 'Space between the lines' end object LblUnitPercus: TLabel Left = 88 Top = 44 Width = 3 Height = 13 Caption = '-' end object Label86: TLabel Left = 13 Top = 78 Width = 46 Height = 13 Caption = 'Bars/staff' end object Bevel3: TBevel Left = 7 Top = 9 Width = 161 Height = 133 Shape = bsFrame end object SBPercus: TScrollBox Left = 181 Top = 32 Width = 136 Height = 110 HorzScrollBar.Visible = False VertScrollBar.Increment = 22 VertScrollBar.Tracking = True BorderStyle = bsNone TabOrder = 3 end object Panel1: TPanel Left = 181 Top = 9 Width = 30 Height = 22 Caption = 'Staff' TabOrder = 4 end object Panel2: TPanel Left = 211 Top = 9 Width = 45 Height = 22 Caption = 'Nb lines' TabOrder = 5 end object Panel3: TPanel Left = 256 Top = 9 Width = 61 Height = 22 Caption = 'Space after' TabOrder = 6 end object EditEcLiPercus: TEdit Tag = 29 Left = 15 Top = 40 Width = 68 Height = 21 TabOrder = 0 OnKeyPress = EditDiagramKeyPress end object SEBarPercus: TSpinEdit Left = 82 Top = 72 Width = 57 Height = 22 EditorEnabled = False MaxValue = 20 MinValue = 0 TabOrder = 1 Value = 0 OnChange = SEBarPercusChange end object BtApplyPercus: TButton Tag = 29 Left = 117 Top = 40 Width = 41 Height = 22 Caption = 'Apply' TabOrder = 7 TabStop = False OnClick = BtApplyDiagramClick end object PanelKeyPercus: TPanel Left = 10 Top = 100 Width = 154 Height = 41 BevelOuter = bvNone TabOrder = 2 object Label73: TLabel Left = 3 Top = 3 Width = 49 Height = 13 Caption = 'Space for ' end object Label85: TLabel Left = 4 Top = 16 Width = 63 Height = 13 Caption = 'key signature' end object Label87: TLabel Left = 73 Top = 26 Width = 6 Height = 13 Caption = '0' end object Label89: TLabel Left = 106 Top = 26 Width = 6 Height = 13 Caption = '5' end object Label88: TLabel Left = 136 Top = 26 Width = 12 Height = 13 Caption = '10' end object TBKeyPercus: TTrackBar Left = 69 Top = 6 Width = 81 Height = 20 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 12 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = RefreshPreview end end end object PrinterSetupDialog: TPrinterSetupDialog Left = 16 Top = 50 end object ColorDialog1: TColorDialog Ctl3D = True Left = 392 Top = 376 end object SaveDialog: TSaveDialog DefaultExt = 'emf' Filter = 'Extended metafile (*.emf)|*.emf' Title = 'Save a graph paper as a metafile' Left = 352 Top = 376 end object TimerLB1: TTimer Enabled = False Interval = 200 OnTimer = TimerLB1Timer Left = 16 Top = 85 end end