D7myChengxie/贸易管理/U_MJEdit.dfm
DESKTOP-E401PHE\Administrator e4d35a6883 1234
2025-08-25 10:39:41 +08:00

533 lines
12 KiB
Plaintext

object frmMJEdit: TfrmMJEdit
Left = 216
Top = 260
Width = 1120
Height = 500
Caption = #24067#21305#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1104
Height = 30
ButtonHeight = 30
ButtonWidth = 71
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 103
OnClick = ToolButton1Click
end
object ToolButton3: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 107
OnClick = ToolButton3Click
end
object ToolButton2: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 58
OnClick = ToolButton2Click
end
object ToolButton4: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #20316#24223
ImageIndex = 48
Visible = False
OnClick = ToolButton4Click
end
object TBClose: TToolButton
Left = 252
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
object ToolButton6: TToolButton
Left = 315
Top = 0
AutoSize = True
Caption = #21367#26631#31614
ImageIndex = 12
OnClick = ToolButton6Click
end
end
object Panel1: TPanel
Left = 0
Top = 30
Width = 1104
Height = 96
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 25
Top = 16
Width = 52
Height = 12
Caption = #24067#21305#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 33
Top = 48
Width = 7
Height = 12
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label4: TLabel
Left = 459
Top = 20
Width = 24
Height = 12
Caption = #27611#37325
end
object M: TLabel
Left = 428
Top = 20
Width = 6
Height = 12
Caption = 'M'
OnDblClick = MDblClick
end
object Label6: TLabel
Left = 343
Top = 20
Width = 24
Height = 12
Caption = #38271#24230
end
object Ma: TLabel
Left = 296
Top = 100
Width = 6
Height = 12
Caption = 'M'
end
object Label7: TLabel
Left = 211
Top = 100
Width = 24
Height = 12
Caption = #21407#30721
end
object Label5: TLabel
Left = 332
Top = 104
Width = 6
Height = 12
Caption = 'M'
end
object Label8: TLabel
Left = 563
Top = 20
Width = 24
Height = 12
Caption = #24133#23485
end
object Label9: TLabel
Left = 644
Top = 20
Width = 12
Height = 12
Caption = 'cm'
end
object Label10: TLabel
Left = 540
Top = 20
Width = 12
Height = 12
Caption = 'Kg'
end
object Label3: TLabel
Left = 563
Top = 44
Width = 24
Height = 12
Caption = #20811#37325
end
object Label11: TLabel
Left = 644
Top = 44
Width = 24
Height = 12
Caption = 'g/'#13217
end
object Label13: TLabel
Left = 343
Top = 48
Width = 24
Height = 12
Caption = #36192#36865
end
object Label12: TLabel
Left = 459
Top = 48
Width = 24
Height = 12
Caption = #20928#37325
end
object Label14: TLabel
Left = 540
Top = 48
Width = 12
Height = 12
Caption = 'Kg'
end
object Label15: TLabel
Left = 231
Top = 20
Width = 24
Height = 12
Caption = #21367#21495
end
object Label16: TLabel
Left = 231
Top = 48
Width = 24
Height = 12
Caption = #32568#21495
end
object Label18: TLabel
Left = 876
Top = 16
Width = 52
Height = 12
Caption = #25171#21360#20221#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 231
Top = 74
Width = 24
Height = 12
Caption = #22791#27880
end
object MJID: TEdit
Left = 80
Top = 10
Width = 110
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
OnKeyPress = MJIDKeyPress
end
object MJMaoZ: TEdit
Left = 484
Top = 16
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 1
end
object MJLen: TEdit
Left = 368
Top = 16
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 2
end
object RadioGroup1: TRadioGroup
Left = 680
Top = 3
Width = 153
Height = 58
Columns = 3
ItemIndex = 0
Items.Strings = (
#27491#21697
#27425#21697)
TabOrder = 3
end
object MJQty1: TEdit
Left = 236
Top = 100
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 4
end
object MJFK: TEdit
Left = 588
Top = 16
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 5
end
object MJSJKZ: TEdit
Left = 588
Top = 40
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 6
end
object MJQty2: TEdit
Left = 368
Top = 44
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 7
end
object MJQty4: TEdit
Left = 484
Top = 44
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 8
end
object MJXH: TEdit
Left = 256
Top = 16
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 9
end
object MJStr4: TEdit
Left = 256
Top = 44
Width = 54
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 10
end
object ComboBox1: TComboBox
Left = 930
Top = 12
Width = 70
Height = 20
Style = csDropDownList
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 12
ItemIndex = 0
TabOrder = 11
Text = '1'
Items.Strings = (
'1'
'2'
'3'
'4')
end
object JYNote: TEdit
Left = 258
Top = 69
Width = 388
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 12
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 126
Width = 1104
Height = 336
Align = alClient
TabOrder = 2
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
Column = Tv2CDQty
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object tv2CDType: TcxGridDBColumn
Caption = #30133#28857#21517#31216
DataBinding.FieldName = 'CDName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = tv2CDTypePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = DataLink_TradeManage.Default
Width = 144
end
object tv2CDWZ: TcxGridDBColumn
Caption = #20301#32622#36215
DataBinding.FieldName = 'CDBeg'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = tv2CDWZPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = DataLink_TradeManage.Default
Width = 96
end
object v2Column2: TcxGridDBColumn
Caption = #20301#32622#27490
DataBinding.FieldName = 'CDend'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Styles.Content = DataLink_TradeManage.Default
Width = 93
end
object Tv2CDQty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'CDQty'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = DataLink_TradeManage.Default
Width = 93
end
object Tv2CDReason: TcxGridDBColumn
Caption = #21407#22240
DataBinding.FieldName = 'CDReason'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 131
end
object v2Column1: TcxGridDBColumn
Caption = #25187#20998
DataBinding.FieldName = 'koufenQty'
HeaderAlignmentHorz = taCenter
Width = 116
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object ADOTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 832
Top = 72
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 312
Top = 200
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 832
Top = 40
end
object DataSource1: TDataSource
DataSet = Order_MJ
Left = 528
Top = 200
end
object Order_MJ: TClientDataSet
Aggregates = <>
Params = <>
Left = 344
Top = 200
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 648
Top = 232
end
object RM2: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
DefaultCollate = False
ShowPrintDialog = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 440
Top = 248
ReportData = {}
end
end