object IBXCreateDatabaseFromSQLDlg: TIBXCreateDatabaseFromSQLDlg Left = 1460 Height = 111 Top = 374 Width = 255 BorderStyle = bsNone Caption = 'IBXCreateDatabaseFromSQLDlg' ClientHeight = 111 ClientWidth = 255 OnShow = FormShow Position = poMainFormCenter LCLVersion = '2.0.0.3' object Bevel1: TBevel Left = 0 Height = 111 Top = 0 Width = 255 Align = alClient end object Label1: TLabel Left = 55 Height = 13 Top = 24 Width = 143 Caption = 'Creating New Database' Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentColor = False ParentFont = False end object ProgressBar: TProgressBar Left = 21 Height = 20 Top = 56 Width = 211 Smooth = True Step = 1 TabOrder = 0 end object IBXScript: TIBXScript AutoDDL = False Echo = False IgnoreGrants = False IgnoreCreateDatabase = False ShowAffectedRows = False ShowPerformanceStats = False OnProgressEvent = IBXScriptProgressEvent OnCreateDatabase = IBXScriptCreateDatabase left = 211 top = 11 end object IBTransaction1: TIBTransaction Active = False Params.Strings = ( 'read_committed' 'rec_version' 'nowait' ) left = 208 top = 80 end end