D7myYunxiang/云翔生产管理(MYSC.dll)/U_ZHDJInPut.dfm
DESKTOP-E401PHE\Administrator 2b9e4b0774 2
2025-09-29 16:40:01 +08:00

888 lines
23 KiB
Plaintext

object frmZHDJInPut: TfrmZHDJInPut
Left = 495
Top = 255
Width = 1344
Height = 697
Caption = #20135#21697#30331#35760
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 15
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1336
Height = 30
ButtonHeight = 30
ButtonWidth = 123
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object Label26: TLabel
Left = 0
Top = 0
Width = 36
Height = 30
Caption = ' '
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel4: TPanel
Left = 36
Top = 0
Width = 331
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 2
Top = 4
Width = 44
Height = 21
Caption = #25195#25551
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object DYID: TEdit
Left = 49
Top = 0
Width = 238
Height = 29
TabOrder = 0
OnKeyPress = DYIDKeyPress
end
object Button1: TButton
Left = 287
Top = 1
Width = 41
Height = 28
Caption = '...'
TabOrder = 1
OnClick = Button1Click
end
end
object TBSave: TToolButton
Left = 367
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object TBPrtInfo: TToolButton
Left = 450
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 14
OnClick = TBPrtInfoClick
end
object TBPrtBJ: TToolButton
Left = 533
Top = 0
Caption = #25171#21360#25253#20215
ImageIndex = 4
OnClick = TBPrtBJClick
end
object TBClose: TToolButton
Left = 656
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
object Edit2: TEdit
Left = 739
Top = 0
Width = 30
Height = 30
TabOrder = 1
Visible = False
end
end
object Panel3: TPanel
Left = 0
Top = 30
Width = 1336
Height = 636
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 1332
Height = 107
Align = alTop
TabOrder = 0
object Label4: TLabel
Left = 15
Top = 10
Width = 48
Height = 15
Caption = #23458#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 246
Top = 10
Width = 98
Height = 15
Caption = #21306#22495'('#22269#23478')'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 893
Top = 1
Width = 16
Height = 105
Align = alRight
Caption = #13#10#22791#13#10#13#10#13#10#13#10#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 268
Top = 42
Width = 64
Height = 15
Caption = #19994#21153#21592#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 268
Top = 82
Width = 64
Height = 15
Caption = #29702#21333#21592#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 662
Top = 1
Width = 16
Height = 105
Align = alRight
Caption = #13#10#23458#13#10#25143#13#10#13#10#24037#13#10#33402
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 452
Top = 9
Width = 64
Height = 15
Caption = #20135#21697#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel66: TPanel
Left = 1075
Top = 1
Width = 179
Height = 105
Align = alRight
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Image2: TImage
Left = 264
Top = 136
Width = 75
Height = 57
Visible = False
OnDblClick = Image2DblClick
end
end
object Panel2: TPanel
Left = 1254
Top = 1
Width = 77
Height = 105
Align = alRight
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Image22: TImage
Left = 14
Top = 169
Width = 53
Height = 45
Visible = False
end
object Button2: TButton
Left = 4
Top = 25
Width = 70
Height = 56
Caption = #36873#25321#21517#29255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button2Click
end
end
object KHName: TBtnEditA
Tag = 2
Left = 59
Top = 6
Width = 182
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnBtnClick = KHNameBtnClick
end
object GuoJia: TBtnEditA
Tag = 2
Left = 326
Top = 6
Width = 115
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
OnBtnClick = GuoJiaBtnClick
end
object Note: TMemo
Tag = 2
Left = 909
Top = 1
Width = 166
Height = 105
Align = alRight
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object YWY: TBtnEditA
Tag = 2
Left = 326
Top = 38
Width = 115
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
OnBtnClick = YWYBtnClick
end
object Panel9: TPanel
Left = 16
Top = 41
Width = 225
Height = 57
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 6
Visible = False
object LabBZ: TLabel
Left = 10
Top = 24
Width = 48
Height = 15
Caption = #24065#31181#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object LabHuiLv: TLabel
Left = 114
Top = 11
Width = 48
Height = 15
Caption = #27719#29575#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 114
Top = 35
Width = 48
Height = 15
Caption = #31995#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BZ: TComboBox
Tag = 2
Left = 54
Top = 20
Width = 39
Height = 23
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 15
ItemIndex = 0
ParentFont = False
TabOrder = 0
Text = '$'
OnChange = BZChange
Items.Strings = (
'$'
#65509)
end
object HuiLv: TEdit
Tag = 2
Left = 163
Top = 7
Width = 57
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnKeyPress = HuiLvKeyPress
end
object XS: TEdit
Tag = 2
Left = 163
Top = 31
Width = 57
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnKeyPress = XSKeyPress
end
end
object LiDan: TBtnEditA
Tag = 2
Left = 326
Top = 78
Width = 115
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 7
OnBtnClick = LiDanBtnClick
end
object KHGY: TMemo
Tag = 9
Left = 678
Top = 1
Width = 215
Height = 105
Align = alRight
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnChange = KHGYChange
end
end
object cxGrid1: TcxGrid
Left = 2
Top = 109
Width = 1332
Height = 525
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
OnMouseDown = Tv1MouseDown
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
end
item
Kind = skCount
Position = spFooter
Column = v1Column7
end
item
Kind = skCount
Column = v1Column7
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skCount
Column = v1Column7
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.DataRowSizing = True
OptionsView.DataRowHeight = 80
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Content = DataLink_MYSC.Default10
Styles.Footer = DataLink_MYSC.Default10
Styles.Header = DataLink_MYSC.Default10
object v1Column9: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
Options.Sorting = False
Width = 40
end
object v1Column7: TcxGridDBColumn
Tag = 2
Caption = #32534#21495
DataBinding.FieldName = 'ZIID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 96
end
object v1Column2: TcxGridDBColumn
Tag = 2
Caption = #21697#21517
DataBinding.FieldName = 'ZIName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 137
end
object v1Column8: TcxGridDBColumn
Tag = 2
Caption = #22270#29255
DataBinding.FieldName = 'ImageFileTP'
PropertiesClassName = 'TcxImageProperties'
Properties.FitMode = ifmProportionalStretch
Properties.GraphicClassName = 'TJPEGImage'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 141
end
object Tv1ZIMF: TcxGridDBColumn
Tag = 2
Caption = #38376#24133
DataBinding.FieldName = 'ZIMF'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnChange = Tv1ZIMFPropertiesChange
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 50
end
object cxgrdbclmnTv1Column6: TcxGridDBColumn
Caption = #33521#23544#38376#24133
DataBinding.FieldName = 'ZIInchMF'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column6: TcxGridDBColumn
Tag = 2
Caption = #20811#37325
DataBinding.FieldName = 'ZIKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 52
end
object v1Column1: TcxGridDBColumn
Tag = 2
Caption = #25104#20221
DataBinding.FieldName = 'ZICF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Footer = DataLink_MYSC.Default10
Width = 77
end
object v1Column10: TcxGridDBColumn
Tag = 2
Caption = #20135#37327
DataBinding.FieldName = 'ZICL'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v1Column11: TcxGridDBColumn
Tag = 2
Caption = #21407#22987#24037#33402
DataBinding.FieldName = 'ZIGYYS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 164
end
object v1ZIGY: TcxGridDBColumn
Tag = 2
Caption = #23458#25143#24037#33402
DataBinding.FieldName = 'ZIGY'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 140
end
object v1Column13: TcxGridDBColumn
Tag = 2
Caption = #24211#23384
DataBinding.FieldName = 'GS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 49
end
object v1Column3: TcxGridDBColumn
Tag = 2
Caption = #31867#21035
DataBinding.FieldName = 'LeiBie'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#30331#35760#26679
#25343#36208#21514#21345)
OnCustomDrawCell = v1Column3CustomDrawCell
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 85
end
object v1ZICost: TcxGridDBColumn
Tag = 2
Caption = #25104#26412
DataBinding.FieldName = 'ZICost'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1ZICostPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 49
end
object v1XS: TcxGridDBColumn
Tag = 2
Caption = #31995#25968
DataBinding.FieldName = 'XS'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1ZICostPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 47
end
object v1BaoJia: TcxGridDBColumn
Tag = 2
Caption = #21442#32771#25253#20215
DataBinding.FieldName = 'BaoJia'
OnCustomDrawCell = v1BaoJiaCustomDrawCell
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 74
end
object v1Column5: TcxGridDBColumn
Tag = 2
Caption = #25253#20215
DataBinding.FieldName = 'BaoJiaYW'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column5PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 60
end
object v1Column12: TcxGridDBColumn
DataBinding.FieldName = 'HeSuanStatus'
Visible = False
VisibleForCustomization = False
end
object Tv1Column1: TcxGridDBColumn
Tag = 2
Caption = #26126#32454#22791#27880
DataBinding.FieldName = 'MXNote'
HeaderAlignmentHorz = taCenter
Width = 120
end
object Tv1Column2: TcxGridDBColumn
Caption = #20135#21697#30331#35760#20154
DataBinding.FieldName = 'CPFiller'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column3: TcxGridDBColumn
Tag = 2
Caption = #38754#24067#25253#20215
DataBinding.FieldName = 'MBBJ'
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv1Column4: TcxGridDBColumn
Tag = 2
Caption = #24213#24067#25253#20215
DataBinding.FieldName = 'DBBJ'
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv1Column5: TcxGridDBColumn
Tag = 2
Caption = #26825#33457#25253#20215
DataBinding.FieldName = 'MHBJ'
HeaderAlignmentHorz = taCenter
Width = 80
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
object Panel1: TPanel
Left = 476
Top = 232
Width = 248
Height = 42
BevelOuter = bvNone
Caption = #27491#22312#22788#29702#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
end
object ADOTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1022
Top = 65533
end
object ADOCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 864
Top = 65533
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 817
Top = 65533
end
object CDS_PRT: TClientDataSet
Aggregates = <>
Params = <>
Left = 843
Top = 65532
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, 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
Dataset = RMDBMain
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 786
Top = 65534
ReportData = {}
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 918
Top = 65533
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 949
Top = 65532
end
object SaveDialog1: TSaveDialog
Left = 969
Top = 65533
end
object adoqueryPicture: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 1057
Top = 65535
end
object RMDBMain: TRMDBDataSet
Visible = True
DataSet = CDS_PRT
Left = 1088
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 976
Top = 64
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 512
Top = 320
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 512
Top = 348
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 512
Top = 377
end
object PopupMenu1: TPopupMenu
Left = 511
Top = 407
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
object N3: TMenuItem
Caption = #21024#38500
OnClick = N3Click
end
end
object ADOQuery2: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 893
Top = 65534
end
object ADOQuery3: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 991
Top = 65533
end
object ADOQuery6: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 1127
Top = 65533
end
end