D7myYunxiang/云翔生产管理(MYSC.dll)/U_MYSC_CKTJ.dfm

672 lines
16 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmMYSC_CKTJ: TfrmMYSC_CKTJ
Left = 190
Top = 135
Width = 1295
Height = 662
Caption = #20179#24211#32479#35745#26597#35810
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 17
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1279
Height = 31
ButtonHeight = 30
ButtonWidth = 69
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_MYSC.ThreeImgList
Flat = True
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 24
OnClick = TBRafreshClick
end
object ToolButton1: TToolButton
Left = 73
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 40
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 146
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
object ToolButton3: TToolButton
Left = 219
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 4
Visible = False
OnClick = ToolButton3Click
end
end
object Panel1: TPanel
Left = 0
Top = 31
Width = 1279
Height = 75
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #183
Color = clSkyBlue
TabOrder = 1
object Label4: TLabel
Left = 678
Top = 87
Width = 68
Height = 17
Caption = #25910#27454#36827#24230
end
object OrdDefNote3: TComboBox
Tag = 1
Left = 750
Top = 74
Width = 165
Height = 25
ItemHeight = 17
TabOrder = 0
Items.Strings = (
#24050#20132#21333
#24050#25215#20817
#24050#25276#27719
#24050#25910#27454
#25276#27719#20013
#20511#27454
''
'')
end
object Panel2: TPanel
Left = 2
Top = 2
Width = 126
Height = 71
Align = alLeft
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object begdate: TDateTimePicker
Left = 61
Top = 8
Width = 67
Height = 25
Date = 41256.918237847230000000
Format = 'yyyy'
Time = 41256.918237847230000000
TabOrder = 0
end
object CheckBox1: TCheckBox
Left = 1
Top = 12
Width = 58
Height = 17
Caption = #24180#20221
TabOrder = 1
end
end
object Panel3: TPanel
Left = 128
Top = 2
Width = 178
Height = 71
Align = alLeft
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 2
Visible = False
object Label1: TLabel
Left = 12
Top = 12
Width = 34
Height = 17
Caption = #26085#26399
end
object FBegDate: TDateTimePicker
Left = 49
Top = 8
Width = 120
Height = 25
Date = 40952.918237847230000000
Format = 'yyyy-MM-dd'
Time = 40952.918237847230000000
TabOrder = 0
end
object FEndDate: TDateTimePicker
Left = 49
Top = 39
Width = 120
Height = 25
Date = 41195.918237847230000000
Format = 'yyyy-MM-dd'
Time = 41195.918237847230000000
TabOrder = 1
end
end
object Panel4: TPanel
Left = 306
Top = 2
Width = 971
Height = 71
Align = alClient
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 3
object Label34: TLabel
Left = 256
Top = 11
Width = 32
Height = 16
Caption = #32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 19
Top = 11
Width = 64
Height = 16
Caption = #21697' '#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 256
Top = 42
Width = 32
Height = 16
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 19
Top = 42
Width = 64
Height = 16
Caption = #24037#33402#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 454
Top = 11
Width = 32
Height = 16
Caption = #39068#33394
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 454
Top = 42
Width = 32
Height = 16
Caption = #31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 615
Top = 11
Width = 32
Height = 16
Caption = #24211#20301
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object RadioGroup1: TRadioGroup
Left = 751
Top = 8
Width = 193
Height = 52
Columns = 2
ItemIndex = 0
Items.Strings = (
#26376#25253#34920
#26085#25253#34920)
TabOrder = 0
OnClick = RadioGroup1Click
end
object MYCode: TEdit
Tag = 2
Left = 289
Top = 7
Width = 142
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = MYNameChange
end
object MYName: TEdit
Tag = 2
Left = 86
Top = 7
Width = 141
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = MYNameChange
end
object Note: TEdit
Tag = 2
Left = 289
Top = 37
Width = 142
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = MYNameChange
end
object GYLXName: TEdit
Tag = 2
Left = 86
Top = 37
Width = 141
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnChange = MYNameChange
end
object MYColor: TEdit
Tag = 2
Left = 488
Top = 7
Width = 110
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnChange = MYNameChange
end
object Edit1: TEdit
Tag = 2
Left = 488
Top = 37
Width = 110
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnChange = MYNameChange
end
object Edit2: TEdit
Tag = 2
Left = 649
Top = 7
Width = 91
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnChange = MYNameChange
end
end
end
object Panetime: TPanel
Left = 415
Top = 186
Width = 221
Height = 46
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31561#24453'...'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
end
object cxTabControl1: TcxTabControl
Left = 0
Top = 106
Width = 1279
Height = 35
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
Style = 8
TabIndex = 0
TabOrder = 3
Tabs.Strings = (
' 1'#26376' '
' 2'#26376' '
' 3'#26376' '
' 4'#26376' '
' 5'#26376' '
' 6'#26376' '
' 7'#26376' '
' 8'#26376' '
' 9'#26376' '
' 10'#26376' '
' 11'#26376' '
' 12'#26376' ')
OnChange = cxTabControl1Change
ClientRectBottom = 36
ClientRectRight = 1279
ClientRectTop = 36
end
object cxGrid2: TcxGrid
Left = 0
Top = 141
Width = 1279
Height = 481
Align = alClient
TabOrder = 4
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DS_HZ
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Column8
end
item
Kind = skSum
Column = v1Column1
end
item
Kind = skSum
Column = v1Column17
end
item
Kind = skSum
Column = v1Column3
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_MYSC.Default10
Styles.Footer = DataLink_MYSC.Default10
Styles.Header = DataLink_MYSC.Default10
object v1Column9: TcxGridDBColumn
Caption = #20837#24211#26085#26399
DataBinding.FieldName = 'CRTime'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
SortIndex = 0
SortOrder = soAscending
Width = 94
end
object v1Column7: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'MYCode'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 86
end
object v1Column5: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MYName'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 190
end
object v1Column10: TcxGridDBColumn
Caption = #24037#33402#21517#31216
DataBinding.FieldName = 'GYLXName'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 216
end
object v1Column4: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'MYColor'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 71
end
object v1Column6: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'MYColorNo'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 61
end
object v1Column8: TcxGridDBColumn
Caption = #32568#25968
DataBinding.FieldName = 'GangQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Footer = DataLink_MYSC.Default10
Width = 51
end
object v1Column1: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'PS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Footer = DataLink_MYSC.Default10
Width = 63
end
object v1Column17: TcxGridDBColumn
Caption = #20844#26020#25968
DataBinding.FieldName = 'KgQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Footer = DataLink_MYSC.Default10
Width = 85
end
object v1Column3: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Footer = DataLink_MYSC.Default10
Width = 71
end
object v1LJQty: TcxGridDBColumn
Caption = #32047#35745#25968#37327
DataBinding.FieldName = 'LJQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Styles.Header = cxStyle1
Width = 70
end
object v1Column2: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
Options.Sorting = False
Width = 185
end
end
object cxGrid2Level1: TcxGridLevel
GridView = Tv2
end
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 482
Top = 209
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 445
Top = 209
end
object ADOQueryMain: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
CommandTimeout = 600
Parameters = <>
Left = 552
Top = 209
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
DefaultCollate = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDB_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 408
Top = 208
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_HZ
Left = 376
Top = 208
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 656
Top = 212
end
object DS_HZ: TDataSource
DataSet = CDS_HZ
Left = 587
Top = 211
end
object CDS_HZ: TClientDataSet
Aggregates = <>
Params = <>
Left = 624
Top = 212
end
object RMXLSExport1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 100
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 516
Top = 209
end
object cxStyleRepository1: TcxStyleRepository
object cxStyle1: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clRed
end
end
end