D7wmbeiqi/贝其贸易管理/U_frmFabSQ.dfm
DESKTOP-E401PHE\Administrator 0843d5fa7d ~
2025-04-30 16:20:38 +08:00

677 lines
15 KiB
Plaintext

object frmFabSQ: TfrmFabSQ
Left = 389
Top = 263
Width = 1224
Height = 580
BorderIcons = [biSystemMenu]
Caption = #22383#24067#30003#35831#21333
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1191
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Flat = True
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentShowHint = False
ShowCaptions = True
ShowHint = False
TabOrder = 0
object TSave: TToolButton
Left = 0
Top = 0
Caption = #20445#23384
ImageIndex = 14
OnClick = TSaveClick
end
object TClose: TToolButton
Left = 59
Top = 0
Caption = #20851#38381
ImageIndex = 55
OnClick = TCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 29
Width = 1191
Height = 260
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Label1: TLabel
Left = 36
Top = 15
Width = 65
Height = 12
Caption = #30003#35831#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 36
Top = 39
Width = 65
Height = 12
Caption = #30003#35831#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 276
Top = 41
Width = 66
Height = 12
Caption = #30003' '#35831' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 36
Top = 185
Width = 65
Height = 12
Caption = #27880#24847#20107#39033#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 276
Top = 15
Width = 66
Height = 12
Caption = #21512' '#21516' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 508
Top = 15
Width = 41
Height = 12
Caption = 'PO #'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 508
Top = 87
Width = 117
Height = 12
Caption = #26159#21542#32433#21378#33258#24049#22791#32433#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 716
Top = 90
Width = 91
Height = 12
Caption = #32433#21378#32852#31995#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 36
Top = 111
Width = 91
Height = 12
Caption = #22383#24067#32852#31995#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 276
Top = 113
Width = 91
Height = 12
Caption = #26579#21378#32852#31995#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 508
Top = 111
Width = 52
Height = 12
Caption = #21518#21152#24037#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 36
Top = 159
Width = 65
Height = 12
Caption = #39564#25910#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 716
Top = 115
Width = 65
Height = 12
Caption = #38144#21806#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 716
Top = 15
Width = 67
Height = 12
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 508
Top = 39
Width = 52
Height = 12
Caption = #20135#21697#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 36
Top = 63
Width = 67
Height = 12
Caption = #35268' '#26684#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 276
Top = 65
Width = 67
Height = 12
Caption = #25104' '#20221#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 508
Top = 64
Width = 67
Height = 12
Caption = #38376' '#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 716
Top = 64
Width = 67
Height = 12
Caption = #20811' '#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 36
Top = 88
Width = 66
Height = 12
Caption = #22383' '#24067' '#21378#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 276
Top = 89
Width = 65
Height = 12
Caption = #25918#26679#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 36
Top = 135
Width = 65
Height = 12
Caption = #21305#26679#24847#35265#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 935
Top = 15
Width = 65
Height = 12
Caption = #20844#21496#25260#22836#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object SQNo: TEdit
Left = 116
Top = 11
Width = 130
Height = 20
Enabled = False
TabOrder = 0
Text = #33258#21160#29983#25104
end
object Note: TMemo
Left = 116
Top = 182
Width = 823
Height = 65
ScrollBars = ssVertical
TabOrder = 1
OnDblClick = NoteDblClick
end
object SQDate: TDateTimePicker
Left = 116
Top = 35
Width = 130
Height = 20
Date = 41906.701154328700000000
Format = 'yyyy-MM-dd'
Time = 41906.701154328700000000
Enabled = False
TabOrder = 2
end
object SQName: TBtnEditA
Left = 355
Top = 35
Width = 130
Height = 20
TabOrder = 3
OnBtnClick = SQNameBtnClick
end
object PONo: TEdit
Left = 568
Top = 11
Width = 130
Height = 20
TabOrder = 4
end
object defstr1: TBtnEditA
Left = 608
Top = 83
Width = 89
Height = 20
TabOrder = 5
OnBtnClick = defstr1BtnClick
end
object ConNo: TBtnEditA
Left = 355
Top = 11
Width = 130
Height = 20
TabOrder = 6
OnBtnClick = ConNoBtnClick
end
object defstr5: TBtnEditA
Left = 568
Top = 108
Width = 130
Height = 20
TabOrder = 7
OnBtnClick = defstr5BtnClick
end
object defstr6: TBtnEditA
Left = 796
Top = 108
Width = 129
Height = 20
TabOrder = 8
OnBtnClick = defstr6BtnClick
end
object defstr7: TBtnEditA
Left = 116
Top = 158
Width = 821
Height = 20
TabOrder = 9
OnBtnClick = defstr7BtnClick
end
object defstr2: TEdit
Left = 796
Top = 83
Width = 129
Height = 20
TabOrder = 10
end
object defstr3: TEdit
Left = 116
Top = 108
Width = 130
Height = 20
TabOrder = 11
end
object defstr4: TEdit
Left = 355
Top = 108
Width = 130
Height = 20
TabOrder = 12
end
object customerNoName: TEdit
Left = 796
Top = 11
Width = 129
Height = 20
TabOrder = 13
end
object factoryName: TBtnEditA
Left = 116
Top = 83
Width = 130
Height = 20
TabOrder = 14
OnBtnClick = factoryNameBtnClick
end
object P_CodeName: TEdit
Left = 568
Top = 35
Width = 358
Height = 20
TabOrder = 15
end
object P_Spec: TEdit
Left = 116
Top = 59
Width = 130
Height = 20
TabOrder = 16
end
object P_CF: TEdit
Left = 355
Top = 59
Width = 130
Height = 20
TabOrder = 17
end
object P_MF: TEdit
Left = 568
Top = 59
Width = 130
Height = 20
TabOrder = 18
end
object P_KZ: TEdit
Left = 796
Top = 59
Width = 129
Height = 20
TabOrder = 19
end
object FYNO: TBtnEditA
Left = 355
Top = 83
Width = 130
Height = 20
TabOrder = 20
OnBtnClick = FYNOBtnClick
end
object defstr8: TEdit
Left = 116
Top = 132
Width = 822
Height = 20
TabOrder = 21
end
object CompanyName: TcxButtonEdit
Left = 998
Top = 11
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = CompanyNamePropertiesButtonClick
TabOrder = 22
Width = 177
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 318
Width = 1191
Height = 249
Align = alTop
TabOrder = 2
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Column = TVC_Qty
end
item
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Header = DataLink_TradeManage.FonePurple
object V1Column6: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
HeaderAlignmentHorz = taCenter
Width = 238
end
object TVC_Qty: TcxGridDBColumn
Tag = 1
Caption = #25968#37327
DataBinding.FieldName = 'C_Qty'
HeaderAlignmentHorz = taCenter
Width = 125
end
object TVC_Unit: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'C_Unit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'M'
'Y'
'Kg')
HeaderAlignmentHorz = taCenter
Width = 87
end
object V1Column1: TcxGridDBColumn
Caption = #21360#33457#24037#33402
DataBinding.FieldName = 'Sdefstr1'
HeaderAlignmentHorz = taCenter
Width = 148
end
object V1Column2: TcxGridDBColumn
Caption = #21512#21516#20132#26399
DataBinding.FieldName = 'Sdefstr2'
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1Column4: TcxGridDBColumn
Caption = #36827#20179#20132#26399
DataBinding.FieldName = 'Sdefstr3'
HeaderAlignmentHorz = taCenter
Width = 144
end
object TVC_Note: TcxGridDBColumn
Caption = #27880#24847#20107#39033
DataBinding.FieldName = 'C_Note'
HeaderAlignmentHorz = taCenter
Width = 162
end
end
object cxGrid1Level1: TcxGridLevel
GridView = TV1
end
end
object ToolBar2: TToolBar
Left = 0
Top = 289
Width = 1191
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar2'
Flat = True
Images = DataLink_TradeManage.ThreeImgList
List = True
ShowCaptions = True
TabOrder = 3
object TAdd: TToolButton
Left = 0
Top = 0
Caption = #22686#34892
ImageIndex = 103
OnClick = TAddClick
end
object TDel: TToolButton
Left = 59
Top = 0
Caption = #21024#34892
ImageIndex = 107
OnClick = TDelClick
end
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 216
Top = 304
end
object ADOQueryCMD: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 256
Top = 304
end
object DataSource1: TDataSource
DataSet = Cds_Sub
Left = 176
Top = 304
end
object Cds_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 136
Top = 304
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 308
Top = 348
end
end