You've already forked lazarus-ccr
74d5466765
server : TCP server implementatiion ( using synapse library ) in synapse_tcp_server.pas Delphi : first binary format support bugs fix in the WSDL generation for the server side git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@158 8e941d3f-bd1b-0410-a28a-d453659cc2b4
125 lines
2.4 KiB
Plaintext
125 lines
2.4 KiB
Plaintext
object fUserEdit: TfUserEdit
|
|
Left = 395
|
|
Height = 241
|
|
Top = 199
|
|
Width = 400
|
|
HorzScrollBar.Page = 399
|
|
VertScrollBar.Page = 240
|
|
ActiveControl = btnOk
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsDialog
|
|
Caption = 'User Edit'
|
|
ClientHeight = 241
|
|
ClientWidth = 400
|
|
Position = poMainFormCenter
|
|
object Panel1: TPanel
|
|
Height = 50
|
|
Top = 191
|
|
Width = 400
|
|
Align = alBottom
|
|
ClientHeight = 50
|
|
ClientWidth = 400
|
|
TabOrder = 0
|
|
object btnOk: TButton
|
|
Left = 224
|
|
Height = 35
|
|
Top = 6
|
|
Width = 75
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'OK'
|
|
Default = True
|
|
ModalResult = 1
|
|
TabOrder = 0
|
|
end
|
|
object Button2: TButton
|
|
Left = 312
|
|
Height = 35
|
|
Top = 6
|
|
Width = 75
|
|
BorderSpacing.InnerBorder = 4
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Height = 191
|
|
Width = 400
|
|
Align = alClient
|
|
ClientHeight = 191
|
|
ClientWidth = 400
|
|
TabOrder = 1
|
|
object Label1: TLabel
|
|
Left = 16
|
|
Height = 18
|
|
Top = 18
|
|
Width = 36
|
|
Caption = 'Name'
|
|
Color = clNone
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 16
|
|
Height = 18
|
|
Top = 53
|
|
Width = 34
|
|
Caption = 'e-Mail'
|
|
Color = clNone
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
Left = 16
|
|
Height = 18
|
|
Top = 88
|
|
Width = 58
|
|
Caption = 'Category'
|
|
Color = clNone
|
|
ParentColor = False
|
|
end
|
|
object Label4: TLabel
|
|
Left = 17
|
|
Height = 18
|
|
Top = 120
|
|
Width = 72
|
|
Caption = 'Preferences'
|
|
Color = clNone
|
|
ParentColor = False
|
|
end
|
|
object edtName: TTIEdit
|
|
Left = 80
|
|
Height = 23
|
|
Top = 16
|
|
Width = 304
|
|
Link.TIPropertyName = 'UserName'
|
|
TabOrder = 0
|
|
end
|
|
object edteMail: TTIEdit
|
|
Left = 80
|
|
Height = 23
|
|
Top = 53
|
|
Width = 304
|
|
Link.TIPropertyName = 'eMail'
|
|
TabOrder = 1
|
|
end
|
|
object edtCategory: TTIComboBox
|
|
Left = 80
|
|
Height = 24
|
|
Top = 88
|
|
Width = 160
|
|
Link.TIPropertyName = 'Category'
|
|
MaxLength = 0
|
|
Style = csDropDownList
|
|
TabOrder = 2
|
|
end
|
|
object edtPreferences: TTIEdit
|
|
Left = 17
|
|
Height = 23
|
|
Top = 146
|
|
Width = 368
|
|
Link.TIPropertyName = 'Preferences'
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
end
|