?? pfm_fendianxx.dfm
字號:
inherited fm_fendianxx: Tfm_fendianxx
Left = 206
Top = 361
Caption = '分店信息管理'
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
inherited PageControl1: TPageControl
Font.Charset = ANSI_CHARSET
ParentFont = False
inherited TabSheet1: TTabSheet
object Label2: TLabel [0]
Left = 32
Top = 24
Width = 52
Height = 13
Caption = '分店代碼'
FocusControl = DBEdit2
end
object Label3: TLabel [1]
Left = 32
Top = 108
Width = 52
Height = 13
Caption = '分店地址'
FocusControl = DBEdit3
end
object Label4: TLabel [2]
Left = 32
Top = 148
Width = 52
Height = 13
Caption = '分店經理'
FocusControl = DBEdit4
end
object Label5: TLabel [3]
Left = 32
Top = 188
Width = 52
Height = 13
Caption = '聯系電話'
FocusControl = DBEdit5
end
object Label6: TLabel [4]
Left = 32
Top = 228
Width = 26
Height = 13
Caption = '備注'
end
object Label7: TLabel [5]
Left = 216
Top = 20
Width = 52
Height = 13
Caption = '分店標識'
FocusControl = DBEdit6
end
object Label1: TLabel [6]
Left = 32
Top = 64
Width = 52
Height = 13
Caption = '分店名稱'
end
object DBEdit2: TDBEdit
Left = 32
Top = 40
Width = 137
Height = 21
DataField = 'fdmc'
DataSource = DataSource1
TabOrder = 9
end
object DBEdit3: TDBEdit
Left = 32
Top = 124
Width = 305
Height = 21
DataField = 'addr'
DataSource = DataSource1
TabOrder = 10
end
object DBEdit4: TDBEdit
Left = 32
Top = 164
Width = 141
Height = 21
DataField = 'manager'
DataSource = DataSource1
TabOrder = 11
end
object DBEdit5: TDBEdit
Left = 32
Top = 204
Width = 141
Height = 21
DataField = 'tel'
DataSource = DataSource1
TabOrder = 12
end
object DBMemo1: TDBMemo
Left = 32
Top = 244
Width = 305
Height = 89
DataField = 'remark'
DataSource = DataSource1
TabOrder = 13
end
object DBEdit6: TDBEdit
Left = 216
Top = 40
Width = 97
Height = 21
DataField = 'fdset'
DataSource = DataSource1
TabOrder = 14
end
object Memo1: TMemo
Left = 384
Top = 44
Width = 241
Height = 237
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋體'
Font.Style = []
Lines.Strings = (
' 注意:'
''
' 1.分店標識是用于分店數據通訊的,'
' 最好第一次加入時確定后就不要'
' 再修改。大小為四個字節(用英'
' 文字母)表示。'
''
' 2.分店代碼4~6個字符,并且也不'
' 要隨意改動。'
''
' 3.倉庫代碼與分店代碼不能重復!')
ParentFont = False
ReadOnly = True
TabOrder = 15
end
object DBEdit1: TDBEdit
Left = 32
Top = 80
Width = 137
Height = 21
DataField = 'fdname'
DataSource = DataSource1
TabOrder = 16
end
end
inherited TabSheet2: TTabSheet
inherited DBGrid1: TDBGrid
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
end
end
end
inherited DataSource1: TDataSource
Left = 180
Top = 48
end
inherited Query1: TQuery
Active = True
BeforePost = Query1BeforePost
SQL.Strings = (
'select * from t_fendianxx')
Left = 140
Top = 56
object Query1fdbm: TIntegerField
FieldName = 'fdbm'
Origin = 'POSDB."dbo.t_fendianxx".fdbm'
end
object Query1fdset: TStringField
FieldName = 'fdset'
Origin = 'POSDB."dbo.t_fendianxx".fdset'
FixedChar = True
Size = 4
end
object Query1fdmc: TStringField
FieldName = 'fdmc'
Origin = 'POSDB."dbo.t_fendianxx".fdmc'
FixedChar = True
end
object Query1fdname: TStringField
FieldName = 'fdname'
Origin = 'POSDB."dbo.t_fendianxx".fdname'
FixedChar = True
end
object Query1addr: TStringField
FieldName = 'addr'
Origin = 'POSDB."dbo.t_fendianxx".addr'
FixedChar = True
Size = 50
end
object Query1manager: TStringField
FieldName = 'manager'
Origin = 'POSDB."dbo.t_fendianxx".manager'
FixedChar = True
end
object Query1tel: TStringField
FieldName = 'tel'
Origin = 'POSDB."dbo.t_fendianxx".tel'
FixedChar = True
end
object Query1remark: TStringField
FieldName = 'remark'
Origin = 'POSDB."dbo.t_fendianxx".remark'
FixedChar = True
Size = 200
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -