D7myYunxiang/云翔OA(WTOA.dll)/U_KDInPut.dfm

574 lines
16 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmKDInPut: TfrmKDInPut
Left = 189
Top = 133
Width = 1381
Height = 695
Caption = #23492#20214#20449#24687#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1365
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
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
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object ToolButton3: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 12
OnClick = ToolButton3Click
end
object ToolButton4: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 13
OnClick = ToolButton4Click
end
object TBClose: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 29
Width = 1365
Height = 330
Align = alClient
TabOrder = 1
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCellClick = Tv1CellClick
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column3
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column2
end
item
Kind = skSum
Column = v1HKMoney
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.GroupFooters = gfAlwaysVisible
Styles.Header = DataLink_WTOA.Default
object v1Column10: TcxGridDBColumn
Caption = #23492#20214#26085#26399
DataBinding.FieldName = 'KDDate'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 76
end
object v1ConNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1ConNoPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column5: TcxGridDBColumn
Caption = #24555#36882#21333#21495
DataBinding.FieldName = 'KDNo'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taRightJustify
Width = 99
end
object v1Column1: TcxGridDBColumn
Caption = #24555#36882#20844#21496
DataBinding.FieldName = 'KDComName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 79
end
object v1Column11: TcxGridDBColumn
Caption = #23492#20214#20154
DataBinding.FieldName = 'JYPerson'
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Width = 78
end
object v1Column12: TcxGridDBColumn
Caption = #19994#21153#21161#29702
DataBinding.FieldName = 'YWZhuLi'
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Width = 82
end
object v1KHName: TcxGridDBColumn
Caption = #25910#20214#20154
DataBinding.FieldName = 'KHName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column18PropertiesButtonClick
Properties.OnEditValueChanged = v1KHNamePropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 94
end
object v1Column6: TcxGridDBColumn
Caption = #25910#20214#22320#22336
DataBinding.FieldName = 'ToPlace'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column6PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 75
end
object v1FKName: TcxGridDBColumn
Caption = #20184#27454#20154
DataBinding.FieldName = 'FKName'
HeaderAlignmentHorz = taCenter
Width = 76
end
object v1Column13: TcxGridDBColumn
Caption = #25910#20214#20154#32852#31995#26041#24335
DataBinding.FieldName = 'KHLXFS'
HeaderAlignmentHorz = taCenter
Width = 97
end
object v1Column9: TcxGridDBColumn
Caption = #25910#20214#22320#21306
DataBinding.FieldName = 'Country'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column9PropertiesButtonClick
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 80
end
object v1Column8: TcxGridDBColumn
Caption = #23492#20214#36135#29289#35814#24773
DataBinding.FieldName = 'KDInfo'
HeaderAlignmentHorz = taCenter
Width = 87
end
object v1Column14: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Width = 58
end
object v1Column2: TcxGridDBColumn
Caption = #24555#36882#36153#29992
DataBinding.FieldName = 'KDMoneyS'
HeaderAlignmentHorz = taCenter
Width = 72
end
object v1FeeShouQuType: TcxGridDBColumn
Caption = #36153#29992#25910#21462#26041#24335
DataBinding.FieldName = 'FeeShouQuType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#20844#36153
#33258#36153
#29616#37329)
HeaderAlignmentHorz = taCenter
Width = 94
end
object v1Column20: TcxGridDBColumn
Caption = #23492#20214#31867#22411
DataBinding.FieldName = 'KDType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#21253#35065
#24555#36882#34955
#25991#20214)
Visible = False
HeaderAlignmentHorz = taCenter
Width = 72
end
object v1Column4: TcxGridDBColumn
Caption = #20184#27454#26041#24335
DataBinding.FieldName = 'FKType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#23492#20184
#21040#20184
#20195#20184)
HeaderAlignmentHorz = taCenter
Width = 72
end
object v1Column3: TcxGridDBColumn
Caption = #37325#37327'(KG)'
DataBinding.FieldName = 'KgQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 78
end
object v1IFDS: TcxGridDBColumn
Caption = #26159#21542#20195#25910#36135#27454
DataBinding.FieldName = 'IFDS'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#26159
'')
HeaderAlignmentHorz = taCenter
Width = 84
end
object v1HKMoney: TcxGridDBColumn
Caption = #36135#27454#37329#39069
DataBinding.FieldName = 'HKMoney'
HeaderAlignmentHorz = taCenter
Width = 69
end
object v1Note: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 147
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar2: TToolBar
Left = 0
Top = 359
Width = 1365
Height = 29
Align = alBottom
ButtonHeight = 30
ButtonWidth = 83
Caption = 'ToolBar1'
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
ParentFont = False
ShowCaptions = True
TabOrder = 2
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 15
OnClick = ToolButton1Click
end
object TYPADD: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #26679#21697#22686#34892
ImageIndex = 12
OnClick = TYPADDClick
end
object ToolButton2: TToolButton
Left = 150
Top = 0
AutoSize = True
Caption = #33457#22411#22686#34892
ImageIndex = 12
OnClick = ToolButton2Click
end
object ToADD: TToolButton
Left = 237
Top = 0
AutoSize = True
Caption = #25163#21160#22686#34892
ImageIndex = 12
OnClick = ToADDClick
end
object ToolButton5: TToolButton
Left = 324
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 13
OnClick = ToolButton5Click
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 388
Width = 1365
Height = 267
Align = alBottom
TabOrder = 3
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.GroupFooters = gfAlwaysVisible
Styles.Inactive = DataLink_WTOA.SkyBlue
Styles.IncSearch = DataLink_WTOA.SkyBlue
Styles.Selection = DataLink_WTOA.SkyBlue
Styles.Header = DataLink_WTOA.Default
object cxGridDBColumn3: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'CYNO'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = cxGridDBColumn3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 115
end
object v2Column2: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'CYName'
HeaderAlignmentHorz = taCenter
Width = 92
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'CYCF'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 104
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'CYMF'
HeaderAlignmentHorz = taCenter
Width = 99
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'CYKZ'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 99
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Width = 72
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'QtyUnit'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 69
end
object cxGridDBColumn17: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 104
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object ADOTemp: TADOQuery
Connection = DataLink_WTOA.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 344
Top = 77
end
object ADOCmd: TADOQuery
Connection = DataLink_WTOA.ADOLink
Parameters = <>
Left = 373
Top = 75
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 471
Top = 80
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 398
Top = 76
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 434
Top = 78
end
object DataSource2: TDataSource
DataSet = ClientDataSet2
Left = 630
Top = 422
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 665
Top = 424
end
object ClientDataSet2: TClientDataSet
Aggregates = <>
Params = <>
Left = 701
Top = 425
end
end