home *** CD-ROM | disk | FTP | other *** search
- object WinCurLineSet: TWinCurLineSet
- Left = 214
- Top = 133
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Select and edit the sets of lines'
- ClientHeight = 357
- ClientWidth = 430
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = True
- Position = poDesktopCenter
- OnActivate = FormActivate
- OnClose = FormClose
- OnCreate = FormCreate
- OnKeyDown = FormKeyDown
- PixelsPerInch = 96
- TextHeight = 13
- object Panel2: TPanel
- Left = 0
- Top = 309
- Width = 430
- Height = 48
- Align = alBottom
- TabOrder = 0
- object BtOK: TBitBtn
- Left = 70
- Top = 11
- Width = 75
- Height = 25
- TabOrder = 0
- TabStop = False
- Kind = bkOK
- end
- object BtCancel: TBitBtn
- Left = 286
- Top = 11
- Width = 75
- Height = 25
- TabOrder = 1
- TabStop = False
- Kind = bkCancel
- end
- object BtUndo: TButton
- Left = 178
- Top = 11
- Width = 75
- Height = 25
- Caption = '&Undo'
- TabOrder = 2
- TabStop = False
- OnClick = BtUndoClick
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 0
- Width = 209
- Height = 309
- TabOrder = 1
- object Label10: TLabel
- Left = 14
- Top = 38
- Width = 28
- Height = 13
- Caption = '&Name'
- FocusControl = EditNom
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label11: TLabel
- Left = 40
- Top = 5
- Width = 129
- Height = 16
- Caption = 'Current set of lines'
- 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 = 72
- 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 = 72
- 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 EditNom: TEdit
- Left = 53
- Top = 33
- Width = 142
- Height = 21
- MaxLength = 25
- TabOrder = 1
- end
- object RGSubDiv: TRadioGroup
- Left = 30
- Top = 228
- Width = 149
- Height = 57
- Caption = ' Subdivision lines '
- Columns = 3
- Items.Strings = (
- 'Dot'
- 'Dash'
- 'Solid')
- TabOrder = 0
- end
- end
- object Panel1: TPanel
- Left = 209
- Top = 0
- Width = 221
- Height = 309
- TabOrder = 2
- object Label8: TLabel
- Left = 28
- Top = 5
- Width = 165
- Height = 16
- Caption = 'Registered sets of lines'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- end
- object LB: TListBox
- Left = 9
- Top = 31
- Width = 202
- Height = 220
- ItemHeight = 16
- Style = lbOwnerDrawFixed
- TabOrder = 0
- OnClick = LBClick
- OnDrawItem = LBDrawItem
- OnKeyDown = LBKeyDown
- end
- object BtDel: TButton
- Left = 15
- Top = 265
- Width = 55
- Height = 25
- Caption = '&Delete'
- TabOrder = 1
- TabStop = False
- OnClick = BtDelClick
- end
- object BtRename: TButton
- Left = 83
- Top = 264
- Width = 55
- Height = 25
- Caption = '&Rename'
- TabOrder = 2
- TabStop = False
- OnClick = BtRenameClick
- end
- object BtDefaultLineSet: TButton
- Left = 150
- Top = 264
- Width = 55
- Height = 25
- Caption = 'De&fault'
- TabOrder = 3
- TabStop = False
- OnClick = BtDefaultLineSetClick
- end
- end
- object ColorDialog1: TColorDialog
- Ctl3D = True
- Left = 12
- Top = 5
- end
- end
-