object SaveDatabaseDlg: TSaveDatabaseDlg
  Left = 699
  Height = 117
  Top = 448
  Width = 244
  BorderStyle = bsNone
  Caption = 'SaveDatabase'
  ClientHeight = 117
  ClientWidth = 244
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  OnShow = FormShow
  Position = poMainFormCenter
  LCLVersion = '1.4.4.0'
  object Panel1: TPanel
    Left = 0
    Height = 117
    Top = 0
    Width = 244
    Align = alClient
    BevelInner = bvLowered
    ClientHeight = 117
    ClientWidth = 244
    TabOrder = 0
    object Status: TLabel
      Left = 30
      Height = 13
      Top = 63
      Width = 193
      AutoSize = False
      Caption = 'Status'
      ParentColor = False
    end
    object Label1: TLabel
      Left = 65
      Height = 13
      Top = 38
      Width = 95
      Caption = 'Saving Database'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.gbk'
    Filter = 'Database Backup Files (*.gbk)|*.gbk|All Files (*.*)|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    left = 168
    top = 80
  end
  object IBBackupService1: TIBBackupService
    Params.Strings = (
      ''
    )
    LoginPrompt = False
    TraceFlags = []
    Verbose = True
    BlockingFactor = 0
    Options = []
    left = 120
    top = 80
  end
  object Timer1: TTimer
    Interval = 0
    OnTimer = Timer1Timer
    left = 208
    top = 80
  end
end