object ShutdownDatabaseDlg: TShutdownDatabaseDlg Left = 2067 Height = 113 Top = 326 Width = 338 BorderStyle = bsNone Caption = 'ShutdownDatabaseDlg' ClientHeight = 113 ClientWidth = 338 OnShow = FormShow Position = poScreenCenter LCLVersion = '1.8.1.0' object StatusMsg: TLabel Left = 24 Height = 14 Top = 16 Width = 304 Alignment = taCenter AutoSize = False Caption = 'StatusMsg' ParentColor = False end object ProgressBar1: TProgressBar Left = 58 Height = 20 Top = 41 Width = 237 Style = pbstMarquee TabOrder = 0 end object CloseBtn: TButton Left = 139 Height = 28 Top = 72 Width = 75 Cancel = True Caption = 'Cancel' ModalResult = 11 OnClick = CloseBtnClick TabOrder = 1 end object Bevel1: TBevel Left = 0 Height = 113 Top = 0 Width = 338 Align = alClient end object IBConfigService: TIBConfigService Protocol = TCP TraceFlags = [] left = 253 top = 64 end end