From 805b70612e0cfd7a5eec55de21e0cff5c526e1ac Mon Sep 17 00:00:00 2001 From: ddf Date: Fri, 21 Mar 2025 13:46:11 +0800 Subject: [PATCH] =?UTF-8?q?=E5=88=A0=E4=BA=86=E5=87=A0=E4=B8=AA=E5=AD=97?= =?UTF-8?q?=E6=AE=B5?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- T02贸易汇总仓库/U_ClothScheduleList.dfm | 8 +- T02贸易汇总仓库/U_ItemizedListList.dfm | 2 - T02贸易汇总仓库/U_TradeClothTotalInList.dfm | 137 ++++--------------- T02贸易汇总仓库/U_TradeClothTotalInList.pas | 10 -- T02贸易汇总仓库/U_TradeClothTotalOutList.dfm | 34 +---- T02贸易汇总仓库/U_TradeClothTotalOutList.pas | 4 - T02贸易汇总仓库/U_TradeClothTotalStkList.dfm | 20 +-- T02贸易汇总仓库/U_TradeClothTotalStkList.pas | 2 - 8 files changed, 31 insertions(+), 186 deletions(-) diff --git a/T02贸易汇总仓库/U_ClothScheduleList.dfm b/T02贸易汇总仓库/U_ClothScheduleList.dfm index cfb3fd0..b093f23 100644 --- a/T02贸易汇总仓库/U_ClothScheduleList.dfm +++ b/T02贸易汇总仓库/U_ClothScheduleList.dfm @@ -8,9 +8,8 @@ inherited frmClothScheduleList: TfrmClothScheduleList Font.Height = -16 FormStyle = fsMDIChild Visible = True - ExplicitTop = -10 - ExplicitWidth = 1536 - ExplicitHeight = 656 + ExplicitWidth = 1528 + ExplicitHeight = 648 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] @@ -199,7 +198,6 @@ inherited frmClothScheduleList: TfrmClothScheduleList Align = alClient BorderStyle = cxcbsNone TabOrder = 2 - ExplicitHeight = 313 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -466,7 +464,6 @@ inherited frmClothScheduleList: TfrmClothScheduleList ParentColor = False ShowCaptions = True TabOrder = 3 - ExplicitTop = 456 object ToolButton5: TToolButton Left = 0 Top = 0 @@ -528,7 +525,6 @@ inherited frmClothScheduleList: TfrmClothScheduleList Properties.CustomButtons.Buttons = <> Properties.Style = 5 OnChange = cxPageControl1Change - ExplicitTop = 486 ClientRectBottom = 239 ClientRectRight = 1520 ClientRectTop = 32 diff --git a/T02贸易汇总仓库/U_ItemizedListList.dfm b/T02贸易汇总仓库/U_ItemizedListList.dfm index 9047e5a..d622bf5 100644 --- a/T02贸易汇总仓库/U_ItemizedListList.dfm +++ b/T02贸易汇总仓库/U_ItemizedListList.dfm @@ -9,7 +9,6 @@ inherited frmItemizedListList: TfrmItemizedListList FormStyle = fsMDIChild Position = poScreenCenter Visible = True - ExplicitLeft = -413 ExplicitWidth = 1727 ExplicitHeight = 767 PixelsPerInch = 96 @@ -228,7 +227,6 @@ inherited frmItemizedListList: TfrmItemizedListList Height = 584 Align = alClient TabOrder = 5 - ExplicitTop = 158 object TV1: TcxGridDBTableView OnDblClick = TV1DblClick Navigator.Buttons.CustomButtons = <> diff --git a/T02贸易汇总仓库/U_TradeClothTotalInList.dfm b/T02贸易汇总仓库/U_TradeClothTotalInList.dfm index aeb7644..72c9634 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalInList.dfm +++ b/T02贸易汇总仓库/U_TradeClothTotalInList.dfm @@ -3,19 +3,20 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Top = 111 Caption = #38754#26009#20837#24211#21015#34920 ClientHeight = 606 - ClientWidth = 1041 + ClientWidth = 1295 Color = clBtnFace Font.Height = -16 FormStyle = fsMDIChild - ExplicitWidth = 1057 - ExplicitHeight = 645 + Visible = True + ExplicitWidth = 1303 + ExplicitHeight = 637 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 - Width = 1041 + Width = 1295 Height = 30 AutoSize = True ButtonHeight = 30 @@ -27,6 +28,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList ParentColor = False ShowCaptions = True TabOrder = 2 + ExplicitWidth = 1041 object TBRafresh: TToolButton Left = 0 Top = 0 @@ -121,7 +123,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList object Panel1: TPanel [1] Left = 0 Top = 30 - Width = 1041 + Width = 1295 Height = 119 Align = alTop BevelInner = bvRaised @@ -129,9 +131,9 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList ParentBackground = False ParentColor = True TabOrder = 3 - ExplicitWidth = 1540 + ExplicitWidth = 1041 object Label3: TLabel - Left = 1080 + Left = 254 Top = 47 Width = 32 Height = 21 @@ -152,7 +154,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Caption = #20837#24211#21333#21495 end object Label8: TLabel - Left = 1079 + Left = 253 Top = 84 Width = 32 Height = 21 @@ -179,20 +181,6 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Height = 21 Caption = #35745#21010#21333#21495 end - object Label1: TLabel - Left = 240 - Top = 47 - Width = 32 - Height = 21 - Caption = #24067#31181 - end - object Label2: TLabel - Left = 239 - Top = 84 - Width = 48 - Height = 21 - Caption = #21152#24037#21035 - end object Label7: TLabel Left = 446 Top = 47 @@ -216,7 +204,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList end object C_name: TcxTextEdit Tag = 2 - Left = 1116 + Left = 290 Top = 43 Properties.OnChange = BCIOIDPropertiesChange TabOrder = 0 @@ -243,7 +231,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList end object C_spec: TcxTextEdit Tag = 2 - Left = 1115 + Left = 289 Top = 80 Properties.OnChange = BCIOIDPropertiesChange TabOrder = 3 @@ -271,7 +259,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList inline frmFrameDateSel1: TfrmFrameDateSel Left = 2 Top = 2 - Width = 1037 + Width = 1291 Height = 37 Align = alTop Color = clWhite @@ -280,7 +268,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList TabOrder = 6 ExplicitLeft = 2 ExplicitTop = 2 - ExplicitWidth = 1536 + ExplicitWidth = 1037 ExplicitHeight = 37 inherited lbl2: TLabel Width = 16 @@ -311,30 +299,12 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList TabOrder = 7 Width = 149 end - object GC_Name: TcxTextEdit - Tag = 2 - Left = 292 - Top = 43 - Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 8 - OnKeyPress = BCIONoKeyPress - Width = 150 - end - object CraftCode: TcxTextEdit - Tag = 2 - Left = 291 - Top = 80 - Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 9 - OnKeyPress = BCIONoKeyPress - Width = 150 - end object FtyPCId: TcxTextEdit Tag = 2 Left = 482 Top = 43 Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 10 + TabOrder = 8 OnKeyPress = BCIONoKeyPress Width = 150 end @@ -343,7 +313,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Left = 703 Top = 80 Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 11 + TabOrder = 9 OnKeyPress = BCIONoKeyPress Width = 150 end @@ -352,7 +322,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Left = 925 Top = 80 Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 12 + TabOrder = 10 OnKeyPress = BCIONoKeyPress Width = 150 end @@ -373,7 +343,7 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList object cxPageControl1: TcxPageControl [4] Left = 0 Top = 149 - Width = 1041 + Width = 1295 Height = 457 Align = alClient TabOrder = 4 @@ -381,27 +351,23 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Properties.CustomButtons.Buttons = <> Properties.Style = 5 OnChange = cxPageControl1Change - ExplicitTop = 89 - ExplicitWidth = 1404 - ExplicitHeight = 426 + ExplicitWidth = 1041 ClientRectBottom = 457 - ClientRectRight = 1041 + ClientRectRight = 1295 ClientRectTop = 32 object cxTabSheet1: TcxTabSheet Caption = ' '#20135#21697#27719#24635' ' ImageIndex = 0 - ExplicitWidth = 1404 - ExplicitHeight = 394 + ExplicitWidth = 1041 object cxGrid2: TcxGrid Left = 0 Top = 0 - Width = 1041 + Width = 1295 Height = 425 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 - ExplicitWidth = 1404 - ExplicitHeight = 394 + ExplicitWidth = 1041 object TV2: TcxGridDBTableView OnDblClick = TV2DblClick Navigator.Buttons.CustomButtons = <> @@ -554,19 +520,16 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList object cxTabSheet2: TcxTabSheet Caption = #20135#21697#26126#32454 ImageIndex = 1 - ExplicitWidth = 1540 - ExplicitHeight = 184 + ExplicitWidth = 1041 object cxGrid1: TcxGrid Left = 0 Top = 0 - Width = 1041 + Width = 1295 Height = 425 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 - ExplicitTop = 8 - ExplicitWidth = 1540 - ExplicitHeight = 241 + ExplicitWidth = 1041 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -1014,46 +977,6 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Options.Editing = False Width = 55 end - object Tv1Column25: TcxGridDBColumn - Caption = #24067#31181 - DataBinding.FieldName = 'GC_Name' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end - object Tv1Column24: TcxGridDBColumn - Caption = #21518#25972#29702#33521#25991 - DataBinding.FieldName = 'CraftEName' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end - object Tv1Column34: TcxGridDBColumn - Caption = #32467#26696#31867#22411 - DataBinding.FieldName = 'SettlementType' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end - object Tv1Column26: TcxGridDBColumn - Caption = #21518#25972#29702#20013#25991 - DataBinding.FieldName = 'CraftName' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end - object Tv1Column23: TcxGridDBColumn - Caption = #21152#24037#21035 - DataBinding.FieldName = 'CraftCode' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end object Tv1Column33: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'PieceNo' @@ -1062,14 +985,6 @@ inherited frmTradeClothTotalInList: TfrmTradeClothTotalInList Options.Editing = False Width = 55 end - object Tv1Column35: TcxGridDBColumn - Caption = #38477#32423#21407#22240 - DataBinding.FieldName = 'Downgrade' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end object Tv1Column28: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'GrossWeight' diff --git a/T02贸易汇总仓库/U_TradeClothTotalInList.pas b/T02贸易汇总仓库/U_TradeClothTotalInList.pas index 59b7438..9d79062 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalInList.pas +++ b/T02贸易汇总仓库/U_TradeClothTotalInList.pas @@ -53,10 +53,6 @@ type FromOrdNo: TcxTextEdit; frmFrameDateSel1: TfrmFrameDateSel; IOType: TcxComboBox; - Label1: TLabel; - Label2: TLabel; - GC_Name: TcxTextEdit; - CraftCode: TcxTextEdit; Label7: TLabel; FtyPCId: TcxTextEdit; Label9: TLabel; @@ -128,13 +124,7 @@ type Tv1Column18: TcxGridDBColumn; Tv1Column22: TcxGridDBColumn; Tv1Column27: TcxGridDBColumn; - Tv1Column25: TcxGridDBColumn; - Tv1Column24: TcxGridDBColumn; - Tv1Column34: TcxGridDBColumn; - Tv1Column26: TcxGridDBColumn; - Tv1Column23: TcxGridDBColumn; Tv1Column33: TcxGridDBColumn; - Tv1Column35: TcxGridDBColumn; Tv1Column28: TcxGridDBColumn; Tv1Column31: TcxGridDBColumn; Tv1Column38: TcxGridDBColumn; diff --git a/T02贸易汇总仓库/U_TradeClothTotalOutList.dfm b/T02贸易汇总仓库/U_TradeClothTotalOutList.dfm index e1361cd..900680b 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalOutList.dfm +++ b/T02贸易汇总仓库/U_TradeClothTotalOutList.dfm @@ -193,20 +193,6 @@ inherited frmTradeClothTotalOutList: TfrmTradeClothTotalOutList Height = 21 Caption = #26469#33258#35745#21010#21333 end - object Label1: TLabel - Left = 948 - Top = 46 - Width = 32 - Height = 21 - Caption = #24067#31181 - end - object Label2: TLabel - Left = 932 - Top = 83 - Width = 48 - Height = 21 - Caption = #21152#24037#21035 - end object C_NAME: TcxTextEdit Tag = 2 Left = 302 @@ -315,24 +301,6 @@ inherited frmTradeClothTotalOutList: TfrmTradeClothTotalOutList TabOrder = 8 Width = 149 end - object GC_Name: TcxTextEdit - Tag = 2 - Left = 984 - Top = 40 - Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 9 - OnKeyPress = BCIONOKeyPress - Width = 150 - end - object CraftCode: TcxTextEdit - Tag = 2 - Left = 984 - Top = 77 - Properties.OnChange = BCIOIDPropertiesChange - TabOrder = 10 - OnKeyPress = BCIONOKeyPress - Width = 150 - end end inherited loadProcess: TPanel Left = 888 @@ -354,7 +322,7 @@ inherited frmTradeClothTotalOutList: TfrmTradeClothTotalOutList Height = 342 Align = alClient TabOrder = 4 - Properties.ActivePage = cxTabSheet1 + Properties.ActivePage = cxTabSheet2 Properties.CustomButtons.Buttons = <> Properties.Style = 5 OnChange = cxPageControl1Change diff --git a/T02贸易汇总仓库/U_TradeClothTotalOutList.pas b/T02贸易汇总仓库/U_TradeClothTotalOutList.pas index 48aa099..eea2ded 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalOutList.pas +++ b/T02贸易汇总仓库/U_TradeClothTotalOutList.pas @@ -57,10 +57,6 @@ type FromOrdNo: TcxTextEdit; frmFrameDateSel1: TfrmFrameDateSel; IOType: TcxComboBox; - Label1: TLabel; - Label2: TLabel; - GC_Name: TcxTextEdit; - CraftCode: TcxTextEdit; ADOQueryPrint: TADOQuery; ToolButton4: TToolButton; cxPageControl1: TcxPageControl; diff --git a/T02贸易汇总仓库/U_TradeClothTotalStkList.dfm b/T02贸易汇总仓库/U_TradeClothTotalStkList.dfm index f09fd0b..cdf9dd3 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalStkList.dfm +++ b/T02贸易汇总仓库/U_TradeClothTotalStkList.dfm @@ -9,8 +9,8 @@ inherited frmTradeClothTotalStkList: TfrmTradeClothTotalStkList FormStyle = fsMDIChild Position = poDefault Visible = True - ExplicitWidth = 1420 - ExplicitHeight = 554 + ExplicitWidth = 1412 + ExplicitHeight = 546 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] @@ -728,14 +728,6 @@ inherited frmTradeClothTotalStkList: TfrmTradeClothTotalStkList HeaderAlignmentHorz = taCenter Width = 55 end - object Tv1Column29: TcxGridDBColumn - Caption = #21512#24182#21333#21495 - DataBinding.FieldName = 'FromMasterOrdNo' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end object Tv1Column30: TcxGridDBColumn Caption = #35843#20986#21512#24182#21333#21495 DataBinding.FieldName = 'SupMasterOrdNo' @@ -752,14 +744,6 @@ inherited frmTradeClothTotalStkList: TfrmTradeClothTotalStkList Options.Editing = False Width = 55 end - object Tv1Column32: TcxGridDBColumn - Caption = #35843#20986#21512#21516#21495 - DataBinding.FieldName = 'SupConNo' - DataBinding.IsNullValueType = True - HeaderAlignmentHorz = taCenter - Options.Editing = False - Width = 55 - end object Tv1Column36: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'PieceNo' diff --git a/T02贸易汇总仓库/U_TradeClothTotalStkList.pas b/T02贸易汇总仓库/U_TradeClothTotalStkList.pas index c9663b8..fcdff7a 100644 --- a/T02贸易汇总仓库/U_TradeClothTotalStkList.pas +++ b/T02贸易汇总仓库/U_TradeClothTotalStkList.pas @@ -85,10 +85,8 @@ type Tv1Column22: TcxGridDBColumn; Tv1Column25: TcxGridDBColumn; Tv1Column28: TcxGridDBColumn; - Tv1Column29: TcxGridDBColumn; Tv1Column30: TcxGridDBColumn; Tv1Column31: TcxGridDBColumn; - Tv1Column32: TcxGridDBColumn; Tv1Column36: TcxGridDBColumn; Tv1Column39: TcxGridDBColumn; Tv1Column40: TcxGridDBColumn;