home *** CD-ROM | disk | FTP | other *** search
- object LibraryForm: TLibraryForm
- Left = 207
- Top = 244
- ActiveControl = LibraryListBox
- BorderStyle = bsDialog
- ClientHeight = 247
- ClientWidth = 514
- ParentFont = True
- PixelsPerInch = 96
- TextHeight = 13
- object BottomPanel: TPanel
- Left = 0
- Top = 217
- Width = 514
- Height = 30
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- object PanelEdit: TPanel
- Left = 0
- Top = 0
- Width = 249
- Height = 33
- BevelOuter = bvNone
- TabOrder = 1
- object ButtonNew: TButton
- Left = 8
- Top = 0
- Width = 73
- Height = 25
- Caption = '&New'
- TabOrder = 0
- OnClick = ButtonNewClick
- end
- object ButtonDelete: TButton
- Left = 88
- Top = 0
- Width = 73
- Height = 25
- Caption = '&Delete'
- TabOrder = 1
- OnClick = ButtonDeleteClick
- end
- object ButtonEdit: TButton
- Left = 168
- Top = 0
- Width = 73
- Height = 25
- Caption = '&Edit'
- TabOrder = 2
- OnClick = ButtonEditClick
- end
- end
- object PanelStandard: TPanel
- Left = 265
- Top = 0
- Width = 249
- Height = 30
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 2
- object ButtonHelp: TButton
- Left = 168
- Top = 0
- Width = 73
- Height = 25
- Caption = 'Help'
- TabOrder = 2
- OnClick = ButtonHelpClick
- end
- object ButtonOK: TButton
- Left = 8
- Top = 0
- Width = 73
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = ButtonOKClick
- end
- object ButtonCancel: TButton
- Left = 88
- Top = 0
- Width = 73
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- OnClick = ButtonCancelClick
- end
- end
- object PanelAdd: TPanel
- Left = 104
- Top = 8
- Width = 249
- Height = 30
- BevelOuter = bvNone
- TabOrder = 0
- Visible = False
- object ButtonOpenNew: TButton
- Left = 8
- Top = 0
- Width = 73
- Height = 25
- Caption = '&New'
- TabOrder = 0
- OnClick = ButtonOpenNewClick
- end
- object ButtonOpenOK: TButton
- Left = 88
- Top = 0
- Width = 73
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 1
- OnClick = ButtonOKClick
- end
- object ButtonOpenCancel: TButton
- Left = 168
- Top = 0
- Width = 73
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- OnClick = ButtonCancelClick
- end
- end
- end
- object TopPanel: TPanel
- Left = 0
- Top = 0
- Width = 514
- Height = 217
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 8
- TabOrder = 0
- object GroupBox: TGroupBox
- Left = 248
- Top = 8
- Width = 257
- Height = 201
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 60
- Width = 52
- Height = 13
- Caption = '&Class path:'
- end
- object Label2: TLabel
- Left = 8
- Top = 104
- Width = 61
- Height = 13
- Caption = '&Source path:'
- end
- object LabelName: TLabel
- Left = 8
- Top = 16
- Width = 31
- Height = 13
- Caption = '&Name:'
- end
- object Label3: TLabel
- Left = 8
- Top = 148
- Width = 47
- Height = 13
- Caption = 'Do&c path:'
- end
- object EditName: TEdit
- Left = 8
- Top = 32
- Width = 217
- Height = 21
- TabOrder = 0
- OnExit = UpdateStorage
- end
- object ButtonEditClassPath: TButton
- Left = 232
- Top = 76
- Width = 17
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 3
- OnClick = ButtonEditPathClick
- end
- object ButtonEditSourcePath: TButton
- Left = 232
- Top = 120
- Width = 17
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 5
- OnClick = ButtonEditPathClick
- end
- object EditClassPath: TEdit
- Left = 8
- Top = 76
- Width = 217
- Height = 21
- TabOrder = 2
- OnExit = UpdateStorage
- end
- object EditSourcePath: TEdit
- Left = 8
- Top = 120
- Width = 217
- Height = 21
- TabOrder = 4
- OnExit = UpdateStorage
- end
- object ButtonBrowse: TButton
- Left = 232
- Top = 32
- Width = 17
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 1
- OnClick = ButtonBrowseClick
- end
- object EditDocPath: TEdit
- Left = 8
- Top = 164
- Width = 217
- Height = 21
- TabOrder = 6
- OnExit = UpdateStorage
- end
- object ButtonEditDocPath: TButton
- Left = 232
- Top = 164
- Width = 17
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 7
- OnClick = ButtonEditPathClick
- end
- end
- object LibraryListBox: TListBox
- Left = 8
- Top = 8
- Width = 233
- Height = 201
- ItemHeight = 13
- TabOrder = 0
- OnClick = LibraryListBoxClick
- OnDblClick = ButtonOKClick
- end
- end
- end
-