source: branches/test1/Client/Forms/UFormLoginProfile.lfm

Last change on this file was 50, checked in by chronos, 14 years ago
  • Fixed: Translation of runtime craeted forms.
  • Fixed: Do not enable controls if condition not met.
File size: 3.6 KB
Line 
1object LoginProfileForm: TLoginProfileForm
2 Left = 276
3 Height = 395
4 Top = 147
5 Width = 527
6 Caption = 'Connection profile'
7 ClientHeight = 395
8 ClientWidth = 527
9 OnClose = FormClose
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 OnShow = FormShow
13 Position = poScreenCenter
14 LCLVersion = '0.9.31'
15 object LabelServer: TLabel
16 Left = 262
17 Height = 18
18 Top = 63
19 Width = 47
20 Anchors = [akTop, akRight]
21 Caption = 'Server:'
22 ParentColor = False
23 end
24 object EditServer: TEdit
25 Left = 345
26 Height = 27
27 Top = 56
28 Width = 178
29 Anchors = [akTop, akRight]
30 OnChange = EditServerChange
31 TabOrder = 0
32 end
33 object ListBoxProfiles: TListBox
34 Left = 10
35 Height = 289
36 Top = 25
37 Width = 240
38 Anchors = [akTop, akLeft, akRight, akBottom]
39 ItemHeight = 0
40 OnSelectionChange = ListBoxProfilesSelectionChange
41 ScrollWidth = 236
42 TabOrder = 1
43 TopIndex = -1
44 end
45 object ButtonOk: TButton
46 Left = 448
47 Height = 25
48 Top = 362
49 Width = 75
50 Anchors = [akRight, akBottom]
51 Caption = 'Ok'
52 ModalResult = 1
53 OnClick = ButtonOkClick
54 TabOrder = 2
55 end
56 object Label1: TLabel
57 Left = 10
58 Height = 18
59 Top = 9
60 Width = 53
61 Caption = 'Profiles:'
62 ParentColor = False
63 end
64 object Panel1: TPanel
65 Left = 8
66 Height = 3
67 Top = 354
68 Width = 515
69 Anchors = [akLeft, akRight, akBottom]
70 BevelInner = bvSpace
71 BevelOuter = bvLowered
72 TabOrder = 3
73 end
74 object SpinEditPort: TSpinEdit
75 Left = 345
76 Height = 27
77 Top = 84
78 Width = 178
79 Anchors = [akTop, akRight]
80 MaxValue = 65535
81 OnChange = SpinEditPortChange
82 TabOrder = 4
83 end
84 object Label2: TLabel
85 Left = 262
86 Height = 18
87 Top = 91
88 Width = 31
89 Anchors = [akTop, akRight]
90 Caption = 'Port:'
91 ParentColor = False
92 end
93 object Label3: TLabel
94 Left = 262
95 Height = 18
96 Top = 117
97 Width = 58
98 Anchors = [akTop, akRight]
99 Caption = 'Protocol:'
100 ParentColor = False
101 end
102 object ComboBoxProtocol: TComboBox
103 Left = 345
104 Height = 27
105 Top = 113
106 Width = 178
107 Anchors = [akTop, akRight]
108 ItemHeight = 0
109 OnChange = ComboBoxProtocolChange
110 Style = csDropDownList
111 TabOrder = 5
112 end
113 object Label4: TLabel
114 Left = 262
115 Height = 18
116 Top = 152
117 Width = 67
118 Anchors = [akTop, akRight]
119 Caption = 'Database:'
120 ParentColor = False
121 end
122 object EditDatabase: TEdit
123 Left = 345
124 Height = 27
125 Top = 145
126 Width = 178
127 Anchors = [akTop, akRight]
128 OnChange = EditDatabaseChange
129 TabOrder = 6
130 end
131 object ButtonAdd: TButton
132 Left = 9
133 Height = 25
134 Top = 322
135 Width = 75
136 Anchors = [akLeft, akBottom]
137 Caption = 'Add'
138 OnClick = ButtonAddClick
139 TabOrder = 7
140 end
141 object ButtonDelete: TButton
142 Left = 96
143 Height = 25
144 Top = 322
145 Width = 75
146 Anchors = [akLeft, akBottom]
147 Caption = 'Delete'
148 OnClick = ButtonDeleteClick
149 TabOrder = 8
150 end
151 object ButtonCancel: TButton
152 Left = 366
153 Height = 25
154 Top = 362
155 Width = 75
156 Anchors = [akRight, akBottom]
157 Caption = 'Cancel'
158 ModalResult = 2
159 TabOrder = 9
160 end
161 object EditName: TEdit
162 Left = 343
163 Height = 27
164 Top = 26
165 Width = 179
166 Anchors = [akTop, akRight]
167 OnChange = EditNameChange
168 TabOrder = 10
169 end
170 object Label5: TLabel
171 Left = 262
172 Height = 18
173 Top = 30
174 Width = 44
175 Anchors = [akTop, akRight]
176 Caption = 'Name:'
177 ParentColor = False
178 end
179end
Note: See TracBrowser for help on using the repository browser.