D7wmguihua/桂华管理系统/U_PDSMEdit.dfm
DESKTOP-E401PHE\Administrator b4b5840f18 1
2025-01-18 16:22:10 +08:00

566 lines
14 KiB
Plaintext

object frmPDSMEdit: TfrmPDSMEdit
Left = -8
Top = -8
Width = 1382
Height = 754
Caption = #30424#28857#25195#25551#31383#21475
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1366
Height = 33
ButtonHeight = 30
ButtonWidth = 59
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 TBSave: TToolButton
Left = 0
Top = 0
Caption = #20445#23384
ImageIndex = 14
Visible = False
end
object TBClose: TToolButton
Left = 59
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 33
Width = 1366
Height = 48
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label16: TLabel
Left = 420
Top = 56
Width = 48
Height = 12
Caption = #36135#36816#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label15: TLabel
Left = 44
Top = 56
Width = 48
Height = 12
Caption = #37197#36135#20154#21592
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label14: TLabel
Left = 234
Top = 56
Width = 24
Height = 12
Caption = #21253#21495
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label1: TLabel
Left = 36
Top = 16
Width = 88
Height = 21
Caption = #26465#30721#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 340
Top = 16
Width = 44
Height = 21
Caption = #24211#20301
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object PHYG: TBtnEditA
Left = 96
Top = 52
Width = 100
Height = 20
TabOrder = 0
Visible = False
end
object defstr2: TComboBox
Left = 472
Top = 52
Width = 101
Height = 20
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Pitch = fpFixed
Font.Style = []
ItemHeight = 12
ItemIndex = 0
ParentFont = False
TabOrder = 2
Visible = False
Items.Strings = (
''
#24555#20214
#24930#20214)
end
object packNo: TcxCurrencyEdit
Left = 262
Top = 52
Properties.DecimalPlaces = 0
Properties.DisplayFormat = '0'
TabOrder = 3
Visible = False
Width = 100
end
object SmNO: TEdit
Left = 124
Top = 12
Width = 185
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnKeyPress = SmNOKeyPress
end
object kcKw: TBtnEditA
Left = 388
Top = 12
Width = 185
Height = 30
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 4
OnBtnClick = kcKwBtnClick
end
end
object Panel2: TPanel
Left = 16
Top = 93
Width = 1262
Height = 464
Caption = 'Panel2'
TabOrder = 2
object cxGrid2: TcxGrid
Left = 1
Top = 1
Width = 1260
Height = 462
Align = alClient
TabOrder = 0
object TV2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCustomDrawCell = TV2CustomDrawCell
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'C_Code'
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn5
end
item
Kind = skSum
Column = cxGridDBColumn6
end
item
Format = #20849' 0 '#34892
Kind = skCount
Column = cxGridDBColumn1
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.ContentEven = cxStyle_fontBlack
Styles.ContentOdd = cxStyle_fontBlack
Styles.Header = cxStyle_gridHead
object cxGridDBColumn1: TcxGridDBColumn
Caption = #25195#25551#20449#24687
DataBinding.FieldName = 'SDefNote'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle_fontclFuchsia
Styles.Footer = cxStyle_fontclFuchsia
Styles.Header = cxStyle_fontclFuchsia
Width = 160
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #26465#30721#21495
DataBinding.FieldName = 'MJID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 122
end
object V2Column2: TcxGridDBColumn
Caption = #24211#20301
DataBinding.FieldName = 'kcKw'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_CodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
HeaderAlignmentHorz = taCenter
Width = 80
end
object V2Column1: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'BCGangNO'
HeaderAlignmentHorz = taCenter
Width = 80
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #31561#32423
DataBinding.FieldName = 'CPType'
HeaderAlignmentHorz = taCenter
Width = 80
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'RollNum'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle_fontclBlue
Styles.Footer = cxStyle_fontclBlue
Styles.Header = cxStyle_fontclBlue
Width = 80
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle_fontclBlue
Styles.Footer = cxStyle_fontclBlue
Styles.Header = cxStyle_fontclBlue
Width = 80
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
end
object MovePanel1: TMovePanel
Left = 236
Top = 156
Width = 785
Height = 353
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 3
Visible = False
object Label2: TLabel
Left = 244
Top = 164
Width = 198
Height = 64
Caption = 'Label2'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -64
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Edit2: TEdit
Left = 177
Top = 43
Width = 412
Height = 72
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -64
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = '91209120001'
end
object Button4: TButton
Left = 296
Top = 272
Width = 75
Height = 41
Caption = #20851#38381
TabOrder = 1
OnClick = Button4Click
end
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 404
Top = 216
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 500
Top = 232
end
object CDSMJID: TClientDataSet
Aggregates = <>
Params = <>
Left = 732
Top = 212
end
object DataSource2: TDataSource
DataSet = CDSMJID
Left = 836
Top = 248
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 352
Top = 312
end
object cxStyleRepository1: TcxStyleRepository
Left = 69
Top = 130
object cxStyle1: TcxStyle
AssignedValues = [svColor, svFont]
Color = clInactiveCaption
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle2: TcxStyle
AssignedValues = [svColor, svFont, svTextColor]
Color = 4707838
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clBtnText
end
object cxStyle_gridRow: TcxStyle
AssignedValues = [svColor, svFont]
Color = 16311512
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_gridFoot: TcxStyle
AssignedValues = [svFont]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_gridHead: TcxStyle
AssignedValues = [svFont]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_gridGroupBox: TcxStyle
AssignedValues = [svColor, svFont]
Color = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_yellow: TcxStyle
AssignedValues = [svColor, svFont]
Color = 8454143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_Red: TcxStyle
AssignedValues = [svColor, svFont]
Color = clRed
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_fontBlack: TcxStyle
AssignedValues = [svFont]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle_fontclFuchsia: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clFuchsia
end
object cxStyle_fontclPurple: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clPurple
end
object cxStyle_fontclGreen: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clGreen
end
object cxStyle_fontclBlue: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clBlue
end
object cxStyle_fontclTeal: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clTeal
end
object cxStyle_fontclOlive: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clOlive
end
end
object ADOQuery1: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 252
Top = 428
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 312
Top = 464
end
object ADOQueryTm: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 152
Top = 192
end
object DSTm: TDataSource
DataSet = ADOQueryTm
Left = 88
Top = 216
end
end