?? pfm_bmxx.dfm
字號:
inherited fm_bmxx: Tfm_bmxx
Left = 189
Top = 108
Caption = '部門信息管理'
Font.Charset = ANSI_CHARSET
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
inherited PageControl1: TPageControl
inherited TabSheet1: TTabSheet
object Label1: TLabel [0]
Left = 48
Top = 20
Width = 52
Height = 13
Caption = '部門代碼'
FocusControl = DBEdit1
end
object Label2: TLabel [1]
Left = 48
Top = 104
Width = 65
Height = 13
Caption = '部門負責人'
FocusControl = DBEdit2
end
object Label3: TLabel [2]
Left = 48
Top = 144
Width = 52
Height = 13
Caption = '聯系電話'
FocusControl = DBEdit3
end
object Label4: TLabel [3]
Left = 48
Top = 184
Width = 26
Height = 13
Caption = '備注'
end
object Label5: TLabel [4]
Left = 48
Top = 60
Width = 52
Height = 13
Caption = '部門名稱'
FocusControl = DBEdit4
end
object DBEdit1: TDBEdit
Left = 48
Top = 36
Width = 137
Height = 21
DataField = 'bmmc'
DataSource = DataSource1
TabOrder = 9
end
object DBEdit2: TDBEdit
Left = 48
Top = 120
Width = 89
Height = 21
DataField = 'bmfzr'
DataSource = DataSource1
TabOrder = 10
end
object DBEdit3: TDBEdit
Left = 48
Top = 160
Width = 137
Height = 21
DataField = 'lxdh'
DataSource = DataSource1
TabOrder = 11
end
object DBMemo1: TDBMemo
Left = 48
Top = 200
Width = 257
Height = 121
DataField = 'remark'
DataSource = DataSource1
TabOrder = 12
end
object DBEdit4: TDBEdit
Left = 48
Top = 76
Width = 141
Height = 21
DataField = 'bmname'
DataSource = DataSource1
TabOrder = 13
end
end
end
inherited DataSource1: TDataSource
Left = 404
Top = 56
end
inherited Query1: TQuery
SQL.Strings = (
'select * from t_bmxx')
Left = 436
Top = 56
object Query1bmdm: TIntegerField
FieldName = 'bmdm'
Origin = 'POSDB."dbo.t_bmxx".bmdm'
end
object Query1bmmc: TStringField
FieldName = 'bmmc'
Origin = 'POSDB."dbo.t_bmxx".bmmc'
FixedChar = True
end
object Query1bmfzr: TStringField
FieldName = 'bmfzr'
Origin = 'POSDB."dbo.t_bmxx".bmfzr'
FixedChar = True
Size = 10
end
object Query1lxdh: TStringField
FieldName = 'lxdh'
Origin = 'POSDB."dbo.t_bmxx".lxdh'
FixedChar = True
Size = 16
end
object Query1remark: TStringField
FieldName = 'remark'
Origin = 'POSDB."dbo.t_bmxx".remark'
FixedChar = True
Size = 150
end
object Query1bmname: TStringField
FieldName = 'bmname'
Origin = 'POSDB."dbo.t_bmxx".bmname'
FixedChar = True
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -