📄 frmffunit.~dfm
字号:
inherited frmFF: TfrmFF
Left = 408
Top = 149
Width = 804
Height = 517
Caption = #35746#21333#21457#25918#26126#32454
OldCreateOrder = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
inherited Panel1: TPanel
Top = 458
Width = 796
inherited btn_Insert: TBitBtn
Left = 323
Visible = False
end
inherited btn_Search: TBitBtn
Left = 679
Visible = False
end
inherited btn_Delete: TBitBtn
Left = 459
Top = 10
Visible = False
end
inherited btn_Edit: TBitBtn
Left = 396
Top = 10
Visible = False
end
inherited btn_Print: TBitBtn
Left = 4
end
inherited btn_Save: TBitBtn
Left = 573
Top = 10
Visible = False
end
inherited btn_Close: TBitBtn
Left = 81
end
inherited Piror_Panel: TPanel
Left = 692
end
end
inherited Panel3: TPanel
Width = 796
Height = 81
object Label1: TLabel
Left = 48
Top = 16
Width = 65
Height = 13
AutoSize = False
Caption = #21463#35746#21333#21495
end
object Label2: TLabel
Left = 48
Top = 48
Width = 57
Height = 13
AutoSize = False
Caption = #38144#21806#20154#21592
end
object Button1: TButton
Left = 400
Top = 48
Width = 81
Height = 25
Caption = #26597#35810
TabOrder = 0
OnClick = Button1Click
end
object ww1: TwwDBLookupComboDlg
Left = 104
Top = 16
Width = 121
Height = 21
GridOptions = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgPerfectRowFit]
GridColor = clWhite
GridTitleAlignment = taLeftJustify
Caption = 'Lookup'
MaxWidth = 0
MaxHeight = 209
Selected.Strings = (
'oS_NO'#9'20'#9#35746#21333#32534#21495#9#9
'OS_DD'#9'18'#9#35746#21333#26085#26399#9#9
'CUS_NO'#9'12'#9#23458#25143#32534#21495#9#9
'SAL_NO'#9'12'#9#19994#21153#21592#32534#21495#9#9)
LookupTable = qrySO
LookupField = 'oS_NO'
TabOrder = 1
AutoDropDown = False
ShowButton = True
AllowClearKey = False
end
object ww2: TwwDBLookupComboDlg
Left = 248
Top = 16
Width = 121
Height = 21
GridOptions = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgPerfectRowFit]
GridColor = clWhite
GridTitleAlignment = taLeftJustify
Caption = 'Lookup'
MaxWidth = 0
MaxHeight = 209
Selected.Strings = (
'oS_NO'#9'20'#9#35746#21333#32534#21495#9#9
'OS_DD'#9'18'#9#35746#21333#26085#26399#9#9
'CUS_NO'#9'12'#9#23458#25143#32534#21495#9#9
'SAL_NO'#9'12'#9#19994#21153#21592#32534#21495#9#9)
LookupTable = qrySO
LookupField = 'oS_NO'
TabOrder = 2
AutoDropDown = False
ShowButton = True
AllowClearKey = False
end
object ww3: TwwDBLookupComboDlg
Left = 104
Top = 48
Width = 121
Height = 21
GridOptions = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgPerfectRowFit]
GridColor = clWhite
GridTitleAlignment = taLeftJustify
Caption = 'Lookup'
MaxWidth = 0
MaxHeight = 209
Selected.Strings = (
'SAL_NO'#9'12'#9#19994#21153#21592#32534#21495#9'F'
'NAME'#9'40'#9#19994#21153#21592#21517#31216#9'F')
LookupTable = qrySAL_NAME
LookupField = 'SAL_NO'
TabOrder = 3
AutoDropDown = False
ShowButton = True
AllowClearKey = False
end
object ww4: TwwDBLookupComboDlg
Left = 248
Top = 48
Width = 121
Height = 21
GridOptions = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgPerfectRowFit]
GridColor = clWhite
GridTitleAlignment = taLeftJustify
Caption = 'Lookup'
MaxWidth = 0
MaxHeight = 209
Selected.Strings = (
'SAL_NO'#9'12'#9#19994#21153#21592#32534#21495#9'F'
'NAME'#9'40'#9#19994#21153#21592#21517#31216#9'F')
LookupTable = qrySAL_NAME
LookupField = 'SAL_NO'
TabOrder = 4
AutoDropDown = False
ShowButton = True
AllowClearKey = False
end
end
inherited Panel2: TPanel
Top = 417
Width = 796
Visible = False
end
object wwDBGrid1: TwwDBGrid [3]
Left = 0
Top = 81
Width = 796
Height = 336
Selected.Strings = (
'COL001'#9'10'#9#21463#35746#21333#21495
'SAL_NO'#9'10'#9#38144#21806#20154#21592
'SAL_NAME'#9'11'#9#20154#21592#21517#31216
'COL002'#9'10'#9#35746#21333#37329#39069
'COL003'#9'14'#9#36864#22238#37329#39069
'COL004'#9'10'#9#24213#20215#37329#39069
'COL005'#9'10'#9#21487#20817#29616#37329#39069
'COL006'#9'10'#9#38144#36135#37329#39069
'COL007'#9'12'#9#38144#36135#36864#22238#37329#39069
'COL008'#9'12'#9#38144#36135#24213#20215#37329#39069
'COL009'#9'10'#9#24212#20817#29616#37329#39069
'COL010'#9'10'#9#36153#29992
'COL011'#9'10'#9#24050#20817#29616#37329#39069
'COL012'#9'11'#9#26410#20817#29616#37329#39069)
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
Align = alClient
DataSource = dsMaster
TabOrder = 3
TitleAlignment = taLeftJustify
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
TitleLines = 1
TitleButtons = False
end
inherited dsMaster: TDataSource
DataSet = qryFF
Left = 360
Top = 168
end
object qryFF: TADOQuery
AutoCalcFields = False
Connection = dm.ADOConnection2
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'SELECT * FROM #FF')
Left = 448
Top = 144
object qryFFCOL001: TStringField
DisplayLabel = #21463#35746#21333#21495
DisplayWidth = 10
FieldName = 'COL001'
Size = 30
end
object qryFFSAL_NO: TStringField
DisplayLabel = #38144#21806#20154#21592
DisplayWidth = 10
FieldName = 'SAL_NO'
Size = 30
end
object qryFFSAL_NAME: TStringField
DisplayLabel = #20154#21592#21517#31216
DisplayWidth = 11
FieldName = 'SAL_NAME'
Size = 30
end
object qryFFCOL002: TBCDField
DisplayLabel = #35746#21333#37329#39069
DisplayWidth = 10
FieldName = 'COL002'
Precision = 28
Size = 8
end
object qryFFCOL003: TBCDField
DisplayLabel = #36864#22238#37329#39069
DisplayWidth = 14
FieldName = 'COL003'
Precision = 28
Size = 8
end
object qryFFCOL004: TBCDField
DisplayLabel = #24213#20215#37329#39069
DisplayWidth = 10
FieldName = 'COL004'
Precision = 28
Size = 8
end
object qryFFCOL005: TBCDField
DisplayLabel = #21487#20817#29616#37329#39069
DisplayWidth = 10
FieldName = 'COL005'
Precision = 28
Size = 8
end
object qryFFCOL006: TBCDField
DisplayLabel = #38144#36135#37329#39069
DisplayWidth = 10
FieldName = 'COL006'
Precision = 28
Size = 8
end
object qryFFCOL007: TBCDField
DisplayLabel = #38144#36135#36864#22238#37329#39069
DisplayWidth = 12
FieldName = 'COL007'
Precision = 28
Size = 8
end
object qryFFCOL008: TBCDField
DisplayLabel = #38144#36135#24213#20215#37329#39069
DisplayWidth = 12
FieldName = 'COL008'
Precision = 28
Size = 8
end
object qryFFCOL009: TBCDField
DisplayLabel = #24212#20817#29616#37329#39069
DisplayWidth = 10
FieldName = 'COL009'
Precision = 28
Size = 8
end
object qryFFCOL010: TBCDField
DisplayLabel = #36153#29992
DisplayWidth = 10
FieldName = 'COL010'
Precision = 28
Size = 8
end
object qryFFCOL011: TBCDField
DisplayLabel = #24050#20817#29616#37329#39069
DisplayWidth = 10
FieldName = 'COL011'
Precision = 28
Size = 8
end
object qryFFCOL012: TBCDField
DisplayLabel = #26410#20817#29616#37329#39069
DisplayWidth = 11
FieldName = 'COL012'
Precision = 28
Size = 8
end
end
object qrySO: TADOQuery
Connection = dm.ADOConnection2
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
''
'select oS_NO,OS_DD,CUS_NO,SAL_NO from MF_POS where OS_ID='#39'SO'#39' ')
Left = 224
Top = 120
object qrySOoS_NO: TStringField
DisplayLabel = #35746#21333#32534#21495
DisplayWidth = 20
FieldName = 'oS_NO'
end
object qrySOOS_DD: TDateTimeField
DisplayLabel = #35746#21333#26085#26399
DisplayWidth = 18
FieldName = 'OS_DD'
end
object qrySOCUS_NO: TStringField
DisplayLabel = #23458#25143#32534#21495
DisplayWidth = 12
FieldName = 'CUS_NO'
Size = 12
end
object qrySOSAL_NO: TStringField
DisplayLabel = #19994#21153#21592#32534#21495
DisplayWidth = 12
FieldName = 'SAL_NO'
Size = 12
end
end
object qrySAL_NAME: TADOQuery
Connection = dm.ADOConnection2
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select SAL_NO,NAME from salm')
Left = 376
Top = 96
object qrySAL_NAMESAL_NO: TStringField
DisplayLabel = #19994#21153#21592#32534#21495
DisplayWidth = 12
FieldName = 'SAL_NO'
Size = 12
end
object qrySAL_NAMENAME: TStringField
DisplayLabel = #19994#21153#21592#21517#31216
DisplayWidth = 40
FieldName = 'NAME'
Size = 40
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -