ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibserviceeditor.lfm
(Generate patch)

Comparing ibx/trunk/design/ibserviceeditor.lfm (file contents):
Revision 19 by tony, Mon Jul 7 13:00:15 2014 UTC vs.
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC

# Line 1 | Line 1
1   object IBServiceEditorForm: TIBServiceEditorForm
2 <  Left = 416
3 <  Height = 345
4 <  Top = 533
2 >  Left = 761
3 >  Height = 340
4 >  Top = 285
5    Width = 438
6    Caption = 'Service Editor'
7 <  ClientHeight = 345
7 >  ClientHeight = 340
8    ClientWidth = 438
9 <  LCLVersion = '1.2.2.0'
9 >  Position = poScreenCenter
10 >  LCLVersion = '1.8.3.0'
11    object Bevel1: TBevel
12      Left = 21
13 <    Height = 274
13 >    Height = 269
14      Top = 22
15      Width = 395
16 +    Anchors = [akTop, akLeft, akRight, akBottom]
17    end
18    object LocalRbtn: TRadioButton
19      Left = 32
20 <    Height = 24
20 >    Height = 22
21      Top = 32
22 <    Width = 57
22 >    Width = 55
23      Caption = '&Local'
24      Checked = True
25      OnClick = LocalRbtnClick
# Line 26 | Line 28 | object IBServiceEditorForm: TIBServiceEd
28    end
29    object RemoteRbtn: TRadioButton
30      Left = 97
31 <    Height = 24
31 >    Height = 22
32      Top = 32
33 <    Width = 71
33 >    Width = 69
34      Caption = '&Remote'
35      OnClick = RemoteRbtnClick
36      TabOrder = 1
37    end
38    object Label7: TLabel
39      Left = 32
40 <    Height = 15
40 >    Height = 14
41      Top = 71
42      Width = 43
43      Caption = '&Server:'
# Line 44 | Line 46 | object IBServiceEditorForm: TIBServiceEd
46    end
47    object ServerName: TEdit
48      Left = 32
49 <    Height = 25
49 >    Height = 24
50      Top = 89
51      Width = 144
52      Enabled = False
# Line 52 | Line 54 | object IBServiceEditorForm: TIBServiceEd
54    end
55    object Label8: TLabel
56      Left = 217
57 <    Height = 15
57 >    Height = 14
58      Top = 71
59      Width = 52
60      Caption = '&Protocol:'
# Line 75 | Line 77 | object IBServiceEditorForm: TIBServiceEd
77    end
78    object Label2: TLabel
79      Left = 32
80 <    Height = 15
80 >    Height = 14
81      Top = 136
82      Width = 70
83      Caption = '&User Name:'
# Line 83 | Line 85 | object IBServiceEditorForm: TIBServiceEd
85    end
86    object UserName: TEdit
87      Left = 32
88 <    Height = 25
88 >    Height = 24
89      Top = 154
90      Width = 137
91      OnChange = UserNameChange
# Line 91 | Line 93 | object IBServiceEditorForm: TIBServiceEd
93    end
94    object Label3: TLabel
95      Left = 32
96 <    Height = 15
96 >    Height = 14
97      Top = 192
98      Width = 59
99      Caption = 'Pass&word:'
# Line 99 | Line 101 | object IBServiceEditorForm: TIBServiceEd
101    end
102    object Password: TEdit
103      Left = 32
104 <    Height = 25
104 >    Height = 24
105      Top = 210
106      Width = 137
107      OnChange = PasswordChange
# Line 107 | Line 109 | object IBServiceEditorForm: TIBServiceEd
109    end
110    object LoginPrompt: TCheckBox
111      Left = 32
112 <    Height = 24
112 >    Height = 22
113      Top = 256
114 <    Width = 107
114 >    Width = 105
115      Caption = 'Lo&gin Prompt'
116      TabOrder = 6
117    end
# Line 123 | Line 125 | object IBServiceEditorForm: TIBServiceEd
125    end
126    object Label5: TLabel
127      Left = 217
128 <    Height = 15
128 >    Height = 14
129      Top = 136
130      Width = 54
131      Caption = 'Se&ttings:'
# Line 133 | Line 135 | object IBServiceEditorForm: TIBServiceEd
135    object OKBtn: TButton
136      Left = 88
137      Height = 30
138 <    Top = 305
138 >    Top = 300
139      Width = 75
140 +    Anchors = [akLeft, akBottom]
141      Caption = 'OK'
142      Default = True
143      ModalResult = 1
# Line 143 | Line 146 | object IBServiceEditorForm: TIBServiceEd
146    object CancelBtn: TButton
147      Left = 169
148      Height = 30
149 <    Top = 305
149 >    Top = 300
150      Width = 74
151 +    Anchors = [akLeft, akBottom]
152      Cancel = True
153      Caption = 'Cancel'
154      ModalResult = 2
# Line 153 | Line 157 | object IBServiceEditorForm: TIBServiceEd
157    object Test: TButton
158      Left = 249
159      Height = 30
160 <    Top = 304
160 >    Top = 299
161      Width = 75
162 +    Anchors = [akLeft, akBottom]
163      Caption = '&Test'
164      OnClick = TestClick
165      TabOrder = 10
166    end
167 +  object Label1: TLabel
168 +    Left = 352
169 +    Height = 14
170 +    Top = 71
171 +    Width = 48
172 +    Caption = 'Port No.'
173 +    ParentColor = False
174 +  end
175 +  object PortNo: TEdit
176 +    Left = 352
177 +    Height = 24
178 +    Top = 89
179 +    Width = 48
180 +    TabOrder = 11
181 +  end
182   end

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines