examples/services/ShutdownDatabaseDlgUnit.lfm

object ShutdownDatabaseDlg: TShutdownDatabaseDlg
  Left = 1320
  Height = 113
  Top = 339
  Width = 338
  BorderStyle = bsNone
  Caption = 'ShutdownDatabaseDlg'
  ClientHeight = 113
  ClientWidth = 338
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '1.8.3.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: TIBXConfigService
    ServicesConnection = MainForm.IBXServicesConnection1
    TraceFlags = []
    left = 258
    top = 63
  end
end
Revision:	218
Committed:	Fri Mar 16 11:08:20 2018 UTC (6 years, 8 months ago) by tony
File size:	1072 byte(s)
Log Message:	Fixes Merged
#	User	Rev	Content
1	tony	143	object ShutdownDatabaseDlg: TShutdownDatabaseDlg
2	tony	218	Left = 1320
3	tony	143	Height = 113
4	tony	218	Top = 339
5	tony	143	Width = 338
6			BorderStyle = bsNone
7			Caption = 'ShutdownDatabaseDlg'
8			ClientHeight = 113
9			ClientWidth = 338
10			OnShow = FormShow
11			Position = poScreenCenter
12	tony	209	LCLVersion = '1.8.3.0'
13	tony	143	object StatusMsg: TLabel
14			Left = 24
15			Height = 14
16			Top = 16
17			Width = 304
18			Alignment = taCenter
19			AutoSize = False
20			Caption = 'StatusMsg'
21			ParentColor = False
22			end
23			object ProgressBar1: TProgressBar
24			Left = 58
25			Height = 20
26			Top = 41
27			Width = 237
28			Style = pbstMarquee
29			TabOrder = 0
30			end
31			object CloseBtn: TButton
32			Left = 139
33			Height = 28
34			Top = 72
35			Width = 75
36			Cancel = True
37			Caption = 'Cancel'
38			ModalResult = 11
39			OnClick = CloseBtnClick
40			TabOrder = 1
41			end
42			object Bevel1: TBevel
43			Left = 0
44			Height = 113
45			Top = 0
46			Width = 338
47			Align = alClient
48			end
49	tony	209	object IBConfigService: TIBXConfigService
50			ServicesConnection = MainForm.IBXServicesConnection1
51	tony	143	TraceFlags = []
52	tony	209	left = 258
53			top = 63
54	tony	143	end
55			end