~

T05贸易门市管理/U_TradeMarketList_XY.dfm

@@ -21,7 +21,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
     Height = 30
     AutoSize = True
     ButtonHeight = 30
-    ButtonWidth = 107
+    ButtonWidth = 131
     Caption = 'ToolBar1'
     Images = DataLink_TradeMarket.cxImageList_bar
     List = True
@@ -36,7 +36,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBRafreshClick
     end
     object TBAdd: TToolButton
-      Left = 63
+      Left = 71
       Top = 0
       AutoSize = True
       Caption = #26032#22686
@@ -44,7 +44,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBAddClick
     end
     object btnCopy: TToolButton
-      Left = 126
+      Left = 142
       Top = 0
       AutoSize = True
       Caption = #22797#21046
@@ -52,7 +52,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = btnCopyClick
     end
     object TBEdit: TToolButton
-      Left = 189
+      Left = 213
       Top = 0
       AutoSize = True
       Caption = #20462#25913
@@ -60,7 +60,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBEditClick
     end
     object TBDel: TToolButton
-      Left = 252
+      Left = 284
       Top = 0
       AutoSize = True
       Caption = #21024#38500
@@ -68,7 +68,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBDelClick
     end
     object TBPrint: TToolButton
-      Left = 315
+      Left = 355
       Top = 0
       AutoSize = True
       Caption = #25171#21360
@@ -76,7 +76,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBPrintClick
     end
     object TBCK: TToolButton
-      Left = 378
+      Left = 426
       Top = 0
       AutoSize = True
       Caption = #26597#30475
@@ -84,7 +84,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBCKClick
     end
     object ToolButton4: TToolButton
-      Left = 441
+      Left = 497
       Top = 0
       AutoSize = True
       Caption = #38468#20214
@@ -92,7 +92,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = ToolButton4Click
     end
     object TBTJ: TToolButton
-      Left = 504
+      Left = 568
       Top = 0
       AutoSize = True
       Caption = #37197#36135#23436#25104
@@ -101,7 +101,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBTJClick
     end
     object TBTJCX: TToolButton
-      Left = 591
+      Left = 671
       Top = 0
       AutoSize = True
       Caption = #25764#38144#37197#36135#23436#25104
@@ -110,7 +110,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBTJCXClick
     end
     object TWC: TToolButton
-      Left = 702
+      Left = 806
       Top = 0
       AutoSize = True
       Caption = #24050#23436#25104
@@ -118,7 +118,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TWCClick
     end
     object TNowc: TToolButton
-      Left = 777
+      Left = 893
       Top = 0
       AutoSize = True
       Caption = #25764#38144#23436#25104
@@ -126,7 +126,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TNowcClick
     end
     object ToolButton2: TToolButton
-      Left = 864
+      Left = 996
       Top = 0
       AutoSize = True
       Caption = #20445#23384#26684#24335
@@ -134,7 +134,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = ToolButton2Click
     end
     object ToolButton1: TToolButton
-      Left = 951
+      Left = 1099
       Top = 0
       AutoSize = True
       Caption = #23548#20986
@@ -142,7 +142,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = ToolButton1Click
     end
     object TBClose: TToolButton
-      Left = 1014
+      Left = 1170
       Top = 0
       AutoSize = True
       Caption = #20851#38381
@@ -150,7 +150,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBCloseClick
     end
     object TBZF: TToolButton
-      Left = 1077
+      Left = 1241
       Top = 0
       AutoSize = True
       Caption = #20316#24223
@@ -158,7 +158,7 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       OnClick = TBZFClick
     end
     object TBNOZF: TToolButton
-      Left = 1140
+      Left = 1312
       Top = 0
       AutoSize = True
       Caption = #25764#38144#20316#24223
@@ -528,7 +528,6 @@ inherited frmTradeMarketList_XY: TfrmTradeMarketList_XY
       '      '#24050#23436#25104'       '
       '      '#20840#37096'      ')
     OnChange = cxTabControl1Change
-    ExplicitTop = 115
     ClientRectBottom = 31
     ClientRectRight = 1924
     ClientRectTop = 28

T05贸易门市管理/U_TradeMarketList_XY.pas

@@ -872,7 +872,7 @@ begin
     begin
       close;
       sql.Clear;
-      sql.Add('update  Trade_Market_Main SET status=''9'' ');
+      sql.Add('update  Trade_Market_Main SET status=''10'' ');
       sql.Add('where TMMId=' + quotedstr(trim(Order_Main.fieldbyname('TMMId').AsString)));
 
       sql.Add('insert into Finance_Need_Up(UType,UDataId,UOperation,UOperator,UModule,UDetails) ');
@@ -918,7 +918,7 @@ begin
     begin
       close;
       sql.Clear;
-      sql.Add('update  Trade_Market_Main SET status=''2'' ');
+      sql.Add('update  Trade_Market_Main SET status=''1'' ');
       sql.Add('where TMMId=' + quotedstr(trim(Order_Main.fieldbyname('TMMId').AsString)));
 
       sql.Add('insert into Finance_Need_Up(UType,UDataId,UOperation,UOperator,UModule,UDetails) ');