681 lines
17 KiB
Plaintext
681 lines
17 KiB
Plaintext
object frmYGYPInPut_YGXZDJ: TfrmYGYPInPut_YGXZDJ
|
|
Left = 189
|
|
Top = 135
|
|
Width = 1383
|
|
Height = 705
|
|
Caption = #34218#36164#21457#25918#24405#20837
|
|
Color = clBtnFace
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
OnClose = FormClose
|
|
OnDestroy = FormDestroy
|
|
OnShow = FormShow
|
|
PixelsPerInch = 107
|
|
TextHeight = 13
|
|
object ToolBar1: TToolBar
|
|
Left = 0
|
|
Top = 0
|
|
Width = 1367
|
|
Height = 29
|
|
ButtonHeight = 30
|
|
ButtonWidth = 83
|
|
Caption = 'ToolBar1'
|
|
Color = clBtnFace
|
|
EdgeInner = esNone
|
|
EdgeOuter = esNone
|
|
Flat = True
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = #23435#20307
|
|
Font.Style = []
|
|
Images = DataLink_WTOA.ThreeImgList
|
|
List = True
|
|
ParentColor = False
|
|
ParentFont = False
|
|
ShowCaptions = True
|
|
TabOrder = 0
|
|
object TBSave: TToolButton
|
|
Left = 0
|
|
Top = 0
|
|
AutoSize = True
|
|
Caption = #20445#23384
|
|
ImageIndex = 15
|
|
OnClick = TBSaveClick
|
|
end
|
|
object TGZFF: TToolButton
|
|
Left = 63
|
|
Top = 0
|
|
AutoSize = True
|
|
Caption = #24037#36164#21457#25918
|
|
ImageIndex = 81
|
|
OnClick = TGZFFClick
|
|
end
|
|
object TBClose: TToolButton
|
|
Left = 150
|
|
Top = 0
|
|
AutoSize = True
|
|
Caption = #20851#38381
|
|
ImageIndex = 21
|
|
OnClick = TBCloseClick
|
|
end
|
|
object TSYGZ: TToolButton
|
|
Left = 213
|
|
Top = 0
|
|
AutoSize = True
|
|
Caption = #21097#20313#24037#36164
|
|
ImageIndex = 11
|
|
Visible = False
|
|
OnClick = TSYGZClick
|
|
end
|
|
end
|
|
object Panel3: TPanel
|
|
Left = 0
|
|
Top = 29
|
|
Width = 1367
|
|
Height = 40
|
|
Align = alTop
|
|
BevelInner = bvRaised
|
|
BevelOuter = bvLowered
|
|
TabOrder = 1
|
|
object Label4: TLabel
|
|
Left = 336
|
|
Top = 16
|
|
Width = 70
|
|
Height = 13
|
|
Caption = #21457#25918#26085#26399#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object Label11: TLabel
|
|
Left = 282
|
|
Top = 125
|
|
Width = 70
|
|
Height = 13
|
|
Caption = #21046#21333#26085#26399#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Visible = False
|
|
end
|
|
object Label6: TLabel
|
|
Left = 517
|
|
Top = 51
|
|
Width = 42
|
|
Height = 13
|
|
Caption = #24065#31181#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Visible = False
|
|
end
|
|
object Label3: TLabel
|
|
Left = 127
|
|
Top = 125
|
|
Width = 56
|
|
Height = 13
|
|
Caption = #21046#21333#20154#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Visible = False
|
|
end
|
|
object Label1: TLabel
|
|
Left = 50
|
|
Top = 16
|
|
Width = 56
|
|
Height = 13
|
|
Caption = #25152#23646#24180#20221
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 192
|
|
Top = 16
|
|
Width = 56
|
|
Height = 13
|
|
Caption = #25152#23646#26376#20221
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object Label5: TLabel
|
|
Left = 524
|
|
Top = 16
|
|
Width = 70
|
|
Height = 13
|
|
Caption = #20184#27454#25260#22836#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object Label7: TLabel
|
|
Left = 677
|
|
Top = 16
|
|
Width = 70
|
|
Height = 13
|
|
Caption = #20184#27454#26041#24335#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object Label8: TLabel
|
|
Left = 842
|
|
Top = 16
|
|
Width = 70
|
|
Height = 13
|
|
Caption = #21457#25918#37096#38376#65306
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = #23435#20307
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object JSDate: TDateTimePicker
|
|
Tag = 2
|
|
Left = 346
|
|
Top = 120
|
|
Width = 108
|
|
Height = 21
|
|
Date = 42226.000000000000000000
|
|
Time = 42226.000000000000000000
|
|
TabOrder = 0
|
|
Visible = False
|
|
end
|
|
object FFDate: TDateTimePicker
|
|
Left = 399
|
|
Top = 12
|
|
Width = 99
|
|
Height = 21
|
|
Date = 42226.000000000000000000
|
|
Time = 42226.000000000000000000
|
|
TabOrder = 1
|
|
end
|
|
object Edit1: TEdit
|
|
Tag = 2
|
|
Left = 179
|
|
Top = 120
|
|
Width = 90
|
|
Height = 21
|
|
Enabled = False
|
|
TabOrder = 2
|
|
Visible = False
|
|
end
|
|
object SSYear: TEdit
|
|
Left = 106
|
|
Top = 12
|
|
Width = 68
|
|
Height = 21
|
|
TabOrder = 3
|
|
end
|
|
object SSMonth: TComboBox
|
|
Left = 248
|
|
Top = 12
|
|
Width = 71
|
|
Height = 21
|
|
ItemHeight = 13
|
|
TabOrder = 4
|
|
Items.Strings = (
|
|
'1'
|
|
'2'
|
|
'3'
|
|
'4'
|
|
'5'
|
|
'6'
|
|
'7'
|
|
'8'
|
|
'9'
|
|
'10'
|
|
'11'
|
|
'12')
|
|
end
|
|
object PriceUnit: TBtnEditA
|
|
Left = 553
|
|
Top = 47
|
|
Width = 73
|
|
Height = 21
|
|
Hint = 'PriceUnit/'#24065#31181
|
|
TabOrder = 5
|
|
Text = #65509
|
|
Visible = False
|
|
OnBtnClick = PriceUnitBtnClick
|
|
end
|
|
object FKTaiTou: TBtnEditA
|
|
Left = 588
|
|
Top = 12
|
|
Width = 73
|
|
Height = 21
|
|
TabOrder = 6
|
|
OnBtnClick = FKTaiTouBtnClick
|
|
end
|
|
object FKType: TComboBox
|
|
Tag = 1
|
|
Left = 742
|
|
Top = 12
|
|
Width = 84
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 7
|
|
Items.Strings = (
|
|
#25171#21345
|
|
#29616#37329)
|
|
end
|
|
object FKDept: TBtnEditA
|
|
Left = 906
|
|
Top = 12
|
|
Width = 79
|
|
Height = 21
|
|
TabOrder = 8
|
|
OnBtnClick = FKDeptBtnClick
|
|
end
|
|
end
|
|
object cxGrid1: TcxGrid
|
|
Left = 0
|
|
Top = 98
|
|
Width = 1367
|
|
Height = 567
|
|
Align = alClient
|
|
PopupMenu = PopupMenu1
|
|
TabOrder = 2
|
|
object Tv1: TcxGridDBTableView
|
|
NavigatorButtons.OnButtonClick = Tv1NavigatorButtonsButtonClick
|
|
NavigatorButtons.ConfirmDelete = False
|
|
NavigatorButtons.First.Visible = True
|
|
NavigatorButtons.PriorPage.Visible = True
|
|
NavigatorButtons.Prior.Visible = True
|
|
NavigatorButtons.Next.Visible = True
|
|
NavigatorButtons.NextPage.Visible = True
|
|
NavigatorButtons.Last.Visible = True
|
|
NavigatorButtons.Insert.Visible = True
|
|
NavigatorButtons.Delete.Visible = True
|
|
NavigatorButtons.Edit.Visible = True
|
|
NavigatorButtons.Post.Visible = True
|
|
NavigatorButtons.Cancel.Visible = True
|
|
NavigatorButtons.Refresh.Visible = True
|
|
NavigatorButtons.SaveBookmark.Visible = True
|
|
NavigatorButtons.GotoBookmark.Visible = True
|
|
NavigatorButtons.Filter.Visible = True
|
|
OnEditKeyDown = Tv1EditKeyDown
|
|
DataController.DataSource = DataSource1
|
|
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
|
DataController.Summary.DefaultGroupSummaryItems = <
|
|
item
|
|
Kind = skCount
|
|
Position = spFooter
|
|
Column = v1YGName
|
|
end>
|
|
DataController.Summary.FooterSummaryItems = <
|
|
item
|
|
Kind = skCount
|
|
Column = v1YGName
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1FFMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1GZMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1JLMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KCDMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KFKMeny
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KGSMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KOtherMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KQJMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1KSBMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1DXGZMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1JKMoney
|
|
end
|
|
item
|
|
Kind = skSum
|
|
Column = v1XHXJMoney
|
|
end>
|
|
DataController.Summary.SummaryGroups = <>
|
|
OptionsBehavior.GoToNextCellOnEnter = True
|
|
OptionsCustomize.ColumnFiltering = False
|
|
OptionsView.Footer = True
|
|
OptionsView.GroupByBox = False
|
|
OptionsView.GroupFooters = gfAlwaysVisible
|
|
OptionsView.Indicator = True
|
|
Styles.Header = cxStyle1
|
|
object v1XHNo: TcxGridDBColumn
|
|
Caption = #24207#21495
|
|
DataBinding.FieldName = 'XHNo'
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 32
|
|
end
|
|
object v1YGName: TcxGridDBColumn
|
|
Caption = #22995#21517
|
|
DataBinding.FieldName = 'YGName'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 76
|
|
end
|
|
object v1GZMoney: TcxGridDBColumn
|
|
Caption = #26376#24037#36164
|
|
DataBinding.FieldName = 'GZMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 82
|
|
end
|
|
object v1KQJMoney: TcxGridDBColumn
|
|
Caption = #35831#20551#22825#25968
|
|
DataBinding.FieldName = 'KQJMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1KSBMoney: TcxGridDBColumn
|
|
Caption = #20241#24687#22825#25968
|
|
DataBinding.FieldName = 'KSBMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1KOtherMoney: TcxGridDBColumn
|
|
Caption = #19978#29677#22825#25968
|
|
DataBinding.FieldName = 'KOtherMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 88
|
|
end
|
|
object v1DXGZMoney: TcxGridDBColumn
|
|
Caption = #22522#26412#24037#36164
|
|
DataBinding.FieldName = 'DXGZMoney'
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 70
|
|
end
|
|
object v1GLFLMoney: TcxGridDBColumn
|
|
Caption = #24037#40836'/'#31119#21033
|
|
DataBinding.FieldName = 'GLFLMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1KGSMoney: TcxGridDBColumn
|
|
Caption = #23703#20301#34917#36148
|
|
DataBinding.FieldName = 'KGSMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
Properties.OnEditValueChanged = v1GZMoneyPropertiesEditValueChanged
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 72
|
|
end
|
|
object v1KFKMeny: TcxGridDBColumn
|
|
Caption = #20445#38505#34917#36148
|
|
DataBinding.FieldName = 'KFKMeny'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
Properties.OnEditValueChanged = v1GZMoneyPropertiesEditValueChanged
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1CJBGZMoney: TcxGridDBColumn
|
|
Caption = #24037#36164
|
|
DataBinding.FieldName = 'JBGZMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1KCDMoney: TcxGridDBColumn
|
|
Caption = #32771#21220#32602#27454
|
|
DataBinding.FieldName = 'KCDMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
Properties.OnEditValueChanged = v1GZMoneyPropertiesEditValueChanged
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1JKMoney: TcxGridDBColumn
|
|
Caption = #25187#27454
|
|
DataBinding.FieldName = 'JKMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
Properties.OnEditValueChanged = v1GZMoneyPropertiesEditValueChanged
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1XHXJMoney: TcxGridDBColumn
|
|
Caption = #32483#33457#23567#35745
|
|
DataBinding.FieldName = 'XHXJMoney'
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 70
|
|
end
|
|
object v1FFMoney: TcxGridDBColumn
|
|
Caption = #24212#21457#24037#36164
|
|
DataBinding.FieldName = 'FFMoney'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1JLMoney: TcxGridDBColumn
|
|
Caption = #22870#37329
|
|
DataBinding.FieldName = 'JLMoney'
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
|
Properties.OnEditValueChanged = v1GZMoneyPropertiesEditValueChanged
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1FKSYSTEM: TcxGridDBColumn
|
|
Caption = #20184#27454#25260#22836
|
|
DataBinding.FieldName = 'FKSYSTEM'
|
|
PropertiesClassName = 'TcxButtonEditProperties'
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
end>
|
|
Properties.OnButtonClick = v1FKSYSTEMPropertiesButtonClick
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1FKType: TcxGridDBColumn
|
|
Caption = #20184#27454#26041#24335
|
|
DataBinding.FieldName = 'FKType'
|
|
PropertiesClassName = 'TcxButtonEditProperties'
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
end>
|
|
Properties.OnButtonClick = v1FKTypePropertiesButtonClick
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 70
|
|
end
|
|
object v1XZNote: TcxGridDBColumn
|
|
Caption = #22791#27880
|
|
DataBinding.FieldName = 'XZNote'
|
|
HeaderAlignmentHorz = taCenter
|
|
Options.Sorting = False
|
|
Width = 86
|
|
end
|
|
end
|
|
object cxGrid1Level1: TcxGridLevel
|
|
GridView = Tv1
|
|
end
|
|
end
|
|
object ToolBar2: TToolBar
|
|
Left = 0
|
|
Top = 69
|
|
Width = 1367
|
|
Height = 29
|
|
ButtonHeight = 30
|
|
ButtonWidth = 59
|
|
Caption = 'ToolBar1'
|
|
Color = clBtnFace
|
|
EdgeInner = esNone
|
|
EdgeOuter = esNone
|
|
Flat = True
|
|
Font.Charset = GB2312_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = #23435#20307
|
|
Font.Style = []
|
|
Images = DataLink_WTOA.ThreeImgList
|
|
List = True
|
|
ParentColor = False
|
|
ParentFont = False
|
|
ShowCaptions = True
|
|
TabOrder = 3
|
|
object ToolButton3: TToolButton
|
|
Left = 0
|
|
Top = 0
|
|
Caption = #22686#34892
|
|
ImageIndex = 12
|
|
OnClick = ToolButton3Click
|
|
end
|
|
object ToolButton4: TToolButton
|
|
Left = 59
|
|
Top = 0
|
|
Caption = #21024#34892
|
|
ImageIndex = 13
|
|
OnClick = ToolButton4Click
|
|
end
|
|
end
|
|
object ADOTemp: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 477
|
|
Top = 216
|
|
end
|
|
object ADOCmd: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 417
|
|
Top = 213
|
|
end
|
|
object PopupMenu1: TPopupMenu
|
|
Left = 389
|
|
Top = 206
|
|
object N1: TMenuItem
|
|
Caption = #22686#21152#22270#29255
|
|
end
|
|
object N2: TMenuItem
|
|
Caption = #21024#38500#22270#29255
|
|
end
|
|
end
|
|
object DataSource1: TDataSource
|
|
DataSet = Order_Sub
|
|
Left = 508
|
|
Top = 216
|
|
end
|
|
object Order_Sub: TClientDataSet
|
|
Aggregates = <>
|
|
FieldDefs = <>
|
|
IndexDefs = <>
|
|
Params = <>
|
|
StoreDefs = True
|
|
Left = 447
|
|
Top = 215
|
|
end
|
|
object cxStyleRepository1: TcxStyleRepository
|
|
object cxStyle1: TcxStyle
|
|
AssignedValues = [svFont]
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
end
|
|
end
|
|
object ADOQueryMain: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 385
|
|
Top = 237
|
|
end
|
|
object ADOQuery1: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 443
|
|
Top = 246
|
|
end
|
|
object ADOQuery2: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 506
|
|
Top = 246
|
|
end
|
|
object ADOQueryJK: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 474
|
|
Top = 247
|
|
end
|
|
object ADOQuery3: TADOQuery
|
|
Connection = DataLink_WTOA.ADOLink
|
|
Parameters = <>
|
|
Left = 414
|
|
Top = 244
|
|
end
|
|
end
|