📄 f_depart_id.dfm
字号:
object w_depart_id: Tw_depart_id
Left = 255
Top = 189
BorderStyle = bsDialog
Caption = #37096#38376#32534#21495#21644#21517#31216' '
ClientHeight = 130
ClientWidth = 266
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -10
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
PixelsPerInch = 94
TextHeight = 13
object Panel1: TPanel
Left = -8
Top = 0
Width = 273
Height = 129
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 16
Width = 141
Height = 13
Caption = #36873#25321#37096#38376#32534#21495#21644#21517#31216' '
end
object ComboBox1: TComboBox
Left = 56
Top = 48
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 0
end
object BitBtn1: TBitBtn
Left = 56
Top = 88
Width = 75
Height = 33
Caption = #30830#23450'[&O]'
ModalResult = 1
TabOrder = 1
end
object BitBtn2: TBitBtn
Left = 158
Top = 88
Width = 75
Height = 33
Caption = #21462#28040'[&C]'
TabOrder = 2
end
end
object data_depart_id: TDataSource
Left = 152
Top = 8
end
object ado_depart_id: TADOQuery
Active = True
Connection = Data1.database1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from depart')
Left = 200
Top = 8
object ado_depart_iddepart_id: TStringField
FieldName = 'depart_id'
FixedChar = True
Size = 5
end
object ado_depart_iddepart_name: TStringField
FieldName = 'depart_name'
FixedChar = True
Size = 15
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -