home *** CD-ROM | disk | FTP | other *** search
- object LoadDbDlg: TLoadDbDlg
- Left = 76
- Top = 105
- ActiveControl = OKBtn
- BorderStyle = bsDialog
- Caption = 'Load Database'
- ClientHeight = 341
- ClientWidth = 365
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 257
- Height = 330
- Shape = bsFrame
- IsControl = True
- end
- object Label1: TLabel
- Left = 16
- Top = 88
- Width = 100
- Height = 13
- Caption = 'Available Databases:'
- end
- object Label2: TLabel
- Left = 16
- Top = 299
- Width = 75
- Height = 13
- Caption = 'Real File Name:'
- end
- object OKBtn: TBitBtn
- Left = 276
- Top = 8
- Width = 77
- Height = 27
- Hint = 'Load Selected Database'
- Caption = '&Load'
- TabOrder = 0
- OnClick = OKBtnClick
- Kind = bkOK
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 276
- Top = 40
- Width = 77
- Height = 27
- Hint = 'Close Dialog Box'
- Caption = '&Cancel'
- TabOrder = 1
- OnClick = CancelBtnClick
- Kind = bkCancel
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 276
- Top = 72
- Width = 77
- Height = 27
- TabOrder = 2
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object ListBox1: TListBox
- Left = 16
- Top = 104
- Width = 145
- Height = 193
- Hint = 'Click Here To Select Database'
- ExtendedSelect = False
- ItemHeight = 13
- TabOrder = 3
- OnClick = ListBox1Click
- OnDblClick = ListBox1DblClick
- end
- object RadioGroup1: TRadioGroup
- Left = 16
- Top = 16
- Width = 145
- Height = 57
- Hint = 'Click Here To Display Public or Private Databases'
- Caption = 'Database Type'
- Items.Strings = (
- 'Private'
- 'Public')
- TabOrder = 4
- OnClick = RadioGroup1Click
- end
- object Edit_Btn: TBitBtn
- Left = 175
- Top = 200
- Width = 77
- Height = 27
- Hint = 'Edit Database Information'
- Caption = '&Edit'
- TabOrder = 5
- OnClick = Edit_BtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
- 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
- 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
- F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
- 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
- FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
- FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
- 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
- 00333377737FFFFF773333303300000003333337337777777333}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object New_Btn: TBitBtn
- Left = 175
- Top = 232
- Width = 77
- Height = 27
- Hint = 'Create A New Database'
- Caption = '&New'
- TabOrder = 6
- OnClick = New_BtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
- 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
- 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object Delete_Btn: TBitBtn
- Left = 175
- Top = 264
- Width = 77
- Height = 27
- Hint = 'Delete Database'
- Caption = '&Delete'
- TabOrder = 7
- OnClick = Delete_BtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
- 3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
- 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
- 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
- 333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
- 03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
- 33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
- 0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
- 3333333337FFF7F3333333333000003333333333377777333333}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object Edit1: TEdit
- Left = 15
- Top = 312
- Width = 242
- Height = 21
- Color = clSilver
- ReadOnly = True
- TabOrder = 8
- end
- end
-