PC World Komputer 1998 January/Pcwk0198.iso/Zadarmo/CYBERCON/_SETUP.1/Ccontact.exe/0/RCDATA/TFRMDATABASELIST/TFRMDATABASELIST.txt

Text File | 1997-08-26 | 6KB | 231 lines

object FrmDatabaseList: TFrmDatabaseList
  Left = 2
  Top = 81
  Width = 569
  Height = 333
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Database List'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 269
    Width = 561
    Height = 37
    Align = alBottom
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 380
      Top = 6
      Width = 75
      Height = 25
      TabOrder = 0
      Kind = bkOK
    end
    object BitBtn2: TBitBtn
      Left = 470
      Top = 6
      Width = 75
      Height = 25
      TabOrder = 1
      Kind = bkCancel
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 561
    Height = 269
    Align = alClient
    BevelInner = bvLowered
    BorderWidth = 4
    Caption = 'Panel2'
    TabOrder = 1
    object ScrollBox: TScrollBox
      Left = 6
      Top = 6
      Width = 549
      Height = 257
      HorzScrollBar.Margin = 6
      HorzScrollBar.Range = 348
      VertScrollBar.Margin = 6
      VertScrollBar.Range = 160
      Align = alClient
      AutoScroll = False
      BorderStyle = bsNone
      TabOrder = 0
      object wwDBGrid1: TwwDBGrid
        Left = 4
        Top = 4
        Width = 373
        Height = 241
        Selected.Strings = (
          'BaseName'#9'30'#9'Database Name'
          'BaseDir'#9'100'#9'Directory')
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        DataSource = frmDataModule.dsBaseName
        KeyOptions = []
        ReadOnly = True
        TabOrder = 4
        TitleAlignment = taLeftJustify
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        TitleLines = 1
        TitleButtons = False
        IndicatorColor = icBlack
      end
      object Button1: TButton
        Left = 384
        Top = 8
        Width = 153
        Height = 25
        Hint = 'Open Selected Database'
        Caption = '&Open'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 384
        Top = 44
        Width = 153
        Height = 25
        Hint = 'Create New Database'
        Caption = '&New'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = Button2Click
      end
      object Button6: TButton
        Left = 386
        Top = 224
        Width = 153
        Height = 25
        Hint = 'Restore To Selected Database'
        Caption = '&Restore'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = Button6Click
      end
      object Button8: TButton
        Left = 384
        Top = 188
        Width = 153
        Height = 25
        Hint = 'Backup Selected Database'
        Caption = '&Backup'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = Button8Click
      end
      object SelectedList: TListBox
        Left = 500
        Top = 8
        Width = 48
        Height = 85
        TabStop = False
        ItemHeight = 13
        MultiSelect = True
        TabOrder = 5
        Visible = False
      end
      object Button3: TButton
        Left = 384
        Top = 80
        Width = 153
        Height = 25
        Hint = 'Import Database'
        Caption = '&Insert Database'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 384
        Top = 118
        Width = 153
        Height = 25
        Hint = 'Delete Selected Database'
        Caption = '&Delete Database'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
        OnClick = Button4Click
      end
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'zip'
    FileEditStyle = fsEdit
    Filter = 'Cyber Files (*.CCB)|*.ccb'
    Title = 'Choose Directory and File Name'
    Left = 86
    Top = 114
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'zip'
    FileEditStyle = fsEdit
    Filter = 'Cyber Files (*.CCB)|*.ccb'
    Title = 'Pick ZIP file to Restore'
    Left = 134
    Top = 114
  end
  object ZipMaster1: TZipMaster
    Verbose = False
    Trace = False
    AddCompLevel = 9
    AddOptions = []
    ExtrOptions = [ExtrOverWrite]
    OnProgress = ZipMaster1Progress
    OnMessage = ZipMaster1Message
    Left = 142
    Top = 82
  end
end