setconntypefrm.dfm
来自「群星医药系统源码」· DFM 代码 · 共 308 行
DFM
308 行
object FmSetConnType: TFmSetConnType
Left = 256
Top = 204
BorderStyle = bsToolWindow
Caption = #26381#21153#22120#36830#25509#35774#32622
ClientHeight = 306
ClientWidth = 443
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 40
Top = 20
Width = 96
Height = 12
Caption = #26381#21153#22120#36830#25509#26041#24335#65306
end
object Label4: TLabel
Left = 40
Top = 44
Width = 96
Height = 12
Caption = #25968#25454#20256#36755#20248#21270#22120#65306
end
object Label5: TLabel
Left = 140
Top = 62
Width = 264
Height = 12
Caption = #27880#65306#12300#20248#21270#25968#25454#20256#36755#12301#21151#33021#20165#22312'Socket'#26041#24335#19979#26377#25928
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object RzPanel1: TRzPanel
Left = 0
Top = 260
Width = 443
Height = 46
Align = alBottom
BorderInner = fsBump
BorderOuter = fsBump
BorderSides = [sdTop]
ParentColor = True
TabOrder = 0
object BtnOk: TRzBitBtn
Left = 148
Top = 12
Caption = #30830#23450'(&O)'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 0
OnClick = BtnOkClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
66666666666666666666666666666666666666666666666666666666AC666666
66666666F86666666666666A22C666666666666F88866666666666A2222C6666
666666F88888666666666A222222C66666666F888888866666666A22CA222C66
66666F888F88886666666A2C66A222C666666F8866F8888666666AC6666A222C
66666F86666F8888666666666666A222C66666666666F8888666666666666A22
2C66666666666F8888666666666666A222C66666666666F8888666666666666A
22C666666666666F8886666666666666A2C6666666666666F886666666666666
6AC66666666666666F8666666666666666666666666666666666}
NumGlyphs = 2
end
object RzBitBtn2: TRzBitBtn
Left = 228
Top = 12
Caption = #21462#28040'(&C)'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 1
OnClick = RzBitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666666666666666666666666666666666666666666666
6666666666666666666669000666669000666F88866666F88866691110666911
10666F8888666F888866669111069111066666F88886F8888666666911101110
6666666F88888888666666669111110666666666F88888866666666669111066
666666666F888866666666669111110666666666F88888866666666911101110
6666666F888888886666669111069111066666F88886F8888666691110666911
10666F8888666F88886669999666669999666FFFF66666FFFF66666666666666
6666666666666666666666666666666666666666666666666666}
NumGlyphs = 2
end
end
object RzGroupBox1: TRzGroupBox
Left = 40
Top = 80
Width = 365
Height = 153
Caption = #35774#23450#24212#29992#31243#24207#26381#21153#22120
ParentColor = True
TabOrder = 1
object Label3: TLabel
Left = 12
Top = 24
Width = 72
Height = 12
Caption = #26381#21153#22120#21015#34920#65306
end
object SpeedButton1: TSpeedButton
Left = 176
Top = 68
Width = 21
Height = 21
Hint = #19978#31227#19968#34892
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777770000077
7777777770666077777777777066607777777777706660777777770000666000
0777777066666660777777770666660777777777706660777777777777060777
7777777777707777777777777777777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 176
Top = 100
Width = 21
Height = 21
Hint = #19979#31227#19968#34892
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333330333333333333330603333333333330666033
3333333306666603333333306666666033333300006660000333333330666033
3333333330666033333333333066603333333333300000333333333333333333
3333333333333333333333333333333333333333333333333333}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object lbSvrList: TRzListBox
Left = 12
Top = 40
Width = 161
Height = 105
FrameVisible = True
ItemHeight = 12
TabOrder = 0
OnClick = lbSvrListClick
end
object RzGroupBox2: TRzGroupBox
Left = 200
Top = 36
Width = 157
Height = 109
Caption = #35814#32454#20449#24687
ParentColor = True
TabOrder = 1
object Label2: TLabel
Left = 8
Top = 24
Width = 36
Height = 12
Caption = #22320#22336#65306
end
object lbPort: TLabel
Left = 8
Top = 52
Width = 36
Height = 12
Caption = #31471#21475#65306
end
object edAddress: TRzEdit
Left = 44
Top = 20
Width = 105
Height = 20
framehottrack = false
FrameHotStyle = fsBump
FrameStyle = fsBump
FrameVisible = True
TabOrder = 0
end
object edPort: TRzSpinEdit
Left = 44
Top = 48
Width = 105
Height = 20
Max = 32767.000000000000000000
Value = 211.000000000000000000
FlatButtons = True
framehottrack = false
FrameHotStyle = fsBump
FrameStyle = fsBump
FrameVisible = True
TabOrder = 1
end
object BtnAdd: TRzButton
Left = 8
Top = 80
Width = 45
Caption = #28155#21152'&A'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 2
OnClick = BtnAddClick
end
object BtnUpd: TRzButton
Left = 56
Top = 80
Width = 45
Caption = #26356#25913'&U'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 3
OnClick = BtnUpdClick
end
object BtnDel: TRzButton
Left = 104
Top = 80
Width = 45
Caption = #21024#38500'&D'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 4
OnClick = BtnDelClick
end
end
object ckLoadBalanced: TRzCheckBox
Left = 200
Top = 12
Width = 145
Height = 17
AlignmentVertical = avCenter
Caption = #21551#29992#22810#26381#21153#22120#36127#36733#24179#34913
Checked = True
FrameColor = 8409372
HighlightColor = 2203937
HotTrack = True
HotTrackColor = 3983359
HotTrackColorType = htctActual
State = cbChecked
TabOrder = 2
end
end
object cbConnType: TRzComboBox
Left = 140
Top = 16
Width = 265
Height = 20
Style = csDropDownList
Ctl3D = False
FlatButtons = True
FrameHotStyle = fsFlat
FrameVisible = True
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
Text = #20351#29992'DCOM'#36830#25509
Items.Strings = (
#20351#29992'DCOM'#36830#25509
#20351#29992'Socket'#36830#25509)
ItemIndex = 0
end
object edInterceptName: TRzEdit
Left = 140
Top = 40
Width = 265
Height = 20
FrameVisible = True
TabOrder = 3
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?