📄 tj_gxdw.dfm
字号:
object frm_gxdw: Tfrm_gxdw
Tag = 11200
Left = 144
Top = 31
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = '关系单位数据维护'
ClientHeight = 543
ClientWidth = 713
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poMainFormCenter
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object pnl_Face: TPanel
Left = 0
Top = 0
Width = 713
Height = 543
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
TabOrder = 0
object pnl_Main: TPanel
Left = 10
Top = 41
Width = 693
Height = 445
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object tv_List: TTreeView
Left = 15
Top = 15
Width = 337
Height = 382
HideSelection = False
Images = ILi_Edit
Indent = 19
ReadOnly = True
TabOrder = 3
OnChange = tv_ListChange
end
object dbg_List: TDBGrid
Left = 15
Top = 15
Width = 337
Height = 382
DataSource = ds_GXDW
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
PopupMenu = data.pm_Export
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'DWDM'
Title.Caption = '单位代码'
Visible = True
end
item
Expanded = False
FieldName = 'DWMC'
Title.Caption = '单位名称'
Width = 150
Visible = True
end
item
Expanded = False
FieldName = 'HOSTNAME'
Title.Caption = '主机名'
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'DWJC'
Title.Caption = '单位简称'
Visible = True
end
item
Expanded = False
FieldName = 'DH'
Title.Caption = '电话'
Visible = True
end
item
Expanded = False
FieldName = 'LXR'
Title.Caption = '联系人'
Visible = True
end
item
Expanded = False
FieldName = 'EMAIL'
Visible = True
end
item
Expanded = False
FieldName = 'DZ'
Title.Caption = '地址'
Visible = True
end
item
Expanded = False
FieldName = 'BZ'
Title.Caption = '备注'
Visible = True
end
item
Expanded = False
FieldName = 'BJ'
Visible = False
end
item
Expanded = False
FieldName = 'ZJSJ'
Visible = False
end
item
Expanded = False
FieldName = 'SJFH'
Visible = False
end
item
Expanded = False
FieldName = 'ZJXJ'
Visible = False
end
item
Expanded = False
FieldName = 'KH'
Visible = False
end
item
Expanded = False
FieldName = 'GYS'
Visible = False
end>
end
object pnl_Show: TPanel
Left = 360
Top = 14
Width = 321
Height = 417
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object lbl_DWDM: TLabel
Left = 26
Top = 18
Width = 24
Height = 12
Caption = '代码'
end
object lbl_DWMC: TLabel
Left = 26
Top = 42
Width = 24
Height = 12
Caption = '全称'
end
object lbl_DWJC: TLabel
Left = 26
Top = 66
Width = 24
Height = 12
Caption = '简称'
end
object lbl_DH: TLabel
Left = 26
Top = 90
Width = 24
Height = 12
Caption = '电话'
end
object lbl_LXR: TLabel
Left = 14
Top = 114
Width = 36
Height = 12
Caption = '联系人'
end
object lbl_email: TLabel
Left = 14
Top = 138
Width = 36
Height = 12
Caption = 'E-MAIL'
end
object lbl_DZ: TLabel
Left = 26
Top = 162
Width = 24
Height = 12
Caption = '地址'
end
object lbl_BZ: TLabel
Left = 26
Top = 186
Width = 24
Height = 12
Caption = '备注'
end
object lbl_ZJM: TLabel
Left = 14
Top = 210
Width = 36
Height = 12
Caption = '主机名'
end
object Label10: TLabel
Left = 202
Top = 18
Width = 12
Height = 12
Hint = '带“**”为必填内容'
Caption = '**'
end
object Label11: TLabel
Left = 297
Top = 42
Width = 12
Height = 12
Hint = '带“**”为必填内容'
Caption = '**'
end
object Label12: TLabel
Left = 202
Top = 66
Width = 12
Height = 12
Hint = '带“**”为必填内容'
Caption = '**'
end
object lbl_PXM: TLabel
Left = 14
Top = 234
Width = 36
Height = 12
Caption = '排序号'
end
object lbl_GKGX: TLabel
Left = 26
Top = 259
Width = 24
Height = 12
Caption = '归口'
end
object dbe_DWDM: TDBEdit
Left = 65
Top = 14
Width = 131
Height = 20
DataField = 'DWDM'
DataSource = ds_GXDW
TabOrder = 0
OnKeyPress = dbe_MKeyPress
end
object dbe_DWMC: TDBEdit
Left = 65
Top = 38
Width = 226
Height = 20
DataField = 'DWMC'
DataSource = ds_GXDW
TabOrder = 1
OnKeyPress = dbe_MKeyPress
end
object dbe_DWJC: TDBEdit
Left = 65
Top = 62
Width = 131
Height = 20
DataField = 'DWJC'
DataSource = ds_GXDW
TabOrder = 2
OnKeyPress = dbe_MKeyPress
end
object dbe_DH: TDBEdit
Left = 65
Top = 86
Width = 131
Height = 20
DataField = 'DH'
DataSource = ds_GXDW
TabOrder = 3
OnKeyPress = dbe_MKeyPress
end
object dbe_ZJM: TDBEdit
Left = 65
Top = 206
Width = 131
Height = 20
DataField = 'HOSTNAME'
DataSource = ds_GXDW
TabOrder = 8
OnKeyPress = dbe_MKeyPress
end
object dbe_LXR: TDBEdit
Left = 65
Top = 110
Width = 131
Height = 20
DataField = 'LXR'
DataSource = ds_GXDW
TabOrder = 4
OnKeyPress = dbe_MKeyPress
end
object gb_BDWGX: TGroupBox
Left = 14
Top = 283
Width = 294
Height = 74
Caption = '与本单位关系'
TabOrder = 12
object dbck_ZJSJ: TDBCheckBox
Left = 102
Top = 19
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -