📄 p_ffry.dfm
字号:
object f_ffry: Tf_ffry
Left = 115
Top = 94
Width = 660
Height = 421
BorderIcons = [biSystemMenu]
Caption = #20154#21592#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 15
object Bevel1: TBevel
Left = 4
Top = 196
Width = 645
Height = 193
ParentShowHint = False
Shape = bsFrame
ShowHint = False
Style = bsRaised
end
object PAN: TPanel
Left = 6
Top = 202
Width = 409
Height = 176
BevelOuter = bvNone
Enabled = False
TabOrder = 1
object Label1: TLabel
Left = 33
Top = 12
Width = 45
Height = 15
Caption = #32534#21495#65306
end
object Label2: TLabel
Left = 33
Top = 40
Width = 45
Height = 15
Caption = #22995#21517#65306
end
object Label3: TLabel
Left = 33
Top = 126
Width = 45
Height = 15
Caption = #37096#38376#65306
end
object Label4: TLabel
Left = 33
Top = 98
Width = 45
Height = 15
Caption = #24615#21035#65306
end
object Label5: TLabel
Left = 33
Top = 156
Width = 45
Height = 15
Caption = #32844#20301#65306
end
object Label6: TLabel
Left = 206
Top = 44
Width = 75
Height = 15
Caption = #20844#21496#30005#35805#65306
end
object Label7: TLabel
Left = 206
Top = 16
Width = 75
Height = 15
Caption = #26412#20154#30005#35805#65306
end
object Label8: TLabel
Left = 3
Top = 70
Width = 75
Height = 15
Caption = #23478#24237#22320#22336#65306
end
object Label9: TLabel
Left = 202
Top = 100
Width = 45
Height = 15
Caption = #22791#27880#65306
end
object ygh: TsuiDBEdit
Left = 81
Top = 10
Width = 121
Height = 23
BorderStyle = bsNone
DataField = 'ygh'
DataSource = dm.DS_FFRY
Enabled = False
TabOrder = 0
UIStyle = DeepBlue
BorderColor = clBlack
end
object suiDBEdit2: TsuiDBEdit
Left = 81
Top = 66
Width = 320
Height = 23
BorderStyle = bsNone
DataField = 'addr'
DataSource = dm.DS_FFRY
TabOrder = 1
UIStyle = DeepBlue
BorderColor = clBlack
end
object ygxm: TsuiDBEdit
Left = 81
Top = 38
Width = 121
Height = 23
BorderStyle = bsNone
DataField = 'xm'
DataSource = dm.DS_FFRY
TabOrder = 2
UIStyle = DeepBlue
BorderColor = clBlack
end
object bm: TsuiDBLookupComboBox
Left = 81
Top = 124
Width = 121
Height = 23
DataField = 'bmh'
DataSource = dm.DS_FFRY
KeyField = 'bmh'
ListField = 'bmm'
ListSource = dm.DS_BM
TabOrder = 3
UIStyle = DeepBlue
BorderColor = clBlack
ArrowColor = clBlack
ButtonColor = 15263976
end
object zw: TsuiDBLookupComboBox
Left = 81
Top = 152
Width = 121
Height = 23
DataField = 'zwh'
DataSource = dm.DS_FFRY
KeyField = 'zwh'
ListField = 'zwmc'
ListSource = dm.DS_zw
TabOrder = 4
UIStyle = DeepBlue
BorderColor = clBlack
ArrowColor = clBlack
ButtonColor = 15263976
end
object suiDBComboBox1: TsuiDBComboBox
Left = 81
Top = 96
Width = 121
Height = 23
Style = csDropDownList
DataField = 'sex'
DataSource = dm.DS_FFRY
ItemHeight = 15
Items.Strings = (
#30007
#22899)
TabOrder = 5
UIStyle = DeepBlue
BorderColor = clBlack
ArrowColor = clBlack
ButtonColor = 15263976
end
object suiDBMemo1: TsuiDBMemo
Left = 246
Top = 96
Width = 155
Height = 79
BorderStyle = bsNone
DataField = 'bz'
DataSource = dm.DS_FFRY
TabOrder = 6
UIStyle = DeepBlue
BorderColor = clBlack
end
object suiDBEdit4: TsuiDBEdit
Left = 274
Top = 11
Width = 121
Height = 23
BorderStyle = bsNone
DataField = 'tel1'
DataSource = dm.DS_FFRY
TabOrder = 7
UIStyle = DeepBlue
BorderColor = clBlack
end
object suiDBEdit5: TsuiDBEdit
Left = 274
Top = 39
Width = 121
Height = 23
BorderStyle = bsNone
DataField = 'tel2'
DataSource = dm.DS_FFRY
TabOrder = 8
UIStyle = DeepBlue
BorderColor = clBlack
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 652
Height = 189
Align = alTop
Color = clWhite
Ctl3D = False
DataSource = dm.DS_QUERY
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentCtl3D = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = 'ygh'
Title.Caption = #21592#24037#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'xm'
Title.Caption = #22995#21517
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -