123456789

This commit is contained in:
ZhangQingYue 2025-07-05 09:59:21 +08:00
parent e46c3d6499
commit 7f4b0ea6b9
75 changed files with 3608 additions and 1044 deletions

View File

@ -128,6 +128,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
BorderStyle = cxcbsNone
PopupMenu = PM_1
TabOrder = 2
ExplicitTop = 88
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -213,6 +214,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #20013#38388#21830
DataBinding.FieldName = 'MiddleName'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 88
@ -221,6 +223,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #20379#24212#21830
DataBinding.FieldName = 'GYS'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Width = 77
end
@ -266,6 +269,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Kind = bkEllipsis
end>
Properties.ReadOnly = False
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
@ -280,6 +284,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Default = True
Kind = bkEllipsis
end>
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
@ -294,6 +299,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Default = True
Kind = bkEllipsis
end>
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
@ -302,6 +308,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #27454#21495
DataBinding.FieldName = 'C_StyleNo'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 77
@ -310,6 +317,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 88
@ -325,6 +333,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
@ -334,6 +343,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
DataBinding.FieldName = 'ConQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
@ -348,6 +358,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
'Kg'
'M'
'Y')
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 58
@ -435,19 +446,24 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Width = 88
end
object TV1Column15: TcxGridDBColumn
Caption = #32433#32447#29992#37327
Caption = #32433#32447#29992#37327'KG'
DataBinding.FieldName = 'SXQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_PurchasePlan.grid_head_red
Styles.Footer = cxStyle1
Styles.Header = DataLink_PurchasePlan.grid_head_red
Width = 100
end
object TV1Column16: TcxGridDBColumn
Caption = #32433#32447#24211#23384
Caption = #32433#32447#24211#23384'KG'
DataBinding.FieldName = 'KCQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_PurchasePlan.grid_head_blue
Styles.Header = DataLink_PurchasePlan.grid_head_blue
Width = 100
end
object v1Column2: TcxGridDBColumn
@ -462,6 +478,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #24050#30003#35831#25968#37327
DataBinding.FieldName = 'SQQty'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Width = 84
end
@ -469,6 +486,7 @@ inherited frmSalesContract_SXSel: TfrmSalesContract_SXSel
Caption = #24050#39046#29992#25968#37327
DataBinding.FieldName = 'LYQty'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Width = 81
end

View File

@ -177,8 +177,8 @@ begin
with ADOQueryMain do
begin
Close;
sql.Clear;
SQL.add('select * from V_HT_SX');
sql.Clear;
SQL.add('select * from V_HT_SX');
Open;
end;
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));

View File

@ -7,14 +7,13 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Height = -12
Font.Name = #23435#20307
Font.Name = #24494#36719#38597#40657
Position = poScreenCenter
OnClose = FormClose
ExplicitLeft = -551
ExplicitWidth = 1556
ExplicitHeight = 597
PixelsPerInch = 96
TextHeight = 12
TextHeight = 17
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
@ -37,7 +36,6 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
ParentFont = False
ShowCaptions = True
TabOrder = 0
ExplicitTop = 5
object ToolButton1: TToolButton
Left = 0
Top = 0
@ -77,21 +75,21 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Left = 18
Top = 15
Width = 36
Height = 12
Height = 17
Caption = #21512#21516#21495
end
object Label2: TLabel
Left = 520
Top = 15
Width = 48
Height = 12
Height = 17
Caption = #20135#21697#21517#31216
end
object Label3: TLabel
Left = 263
Top = 15
Width = 48
Height = 12
Height = 17
Caption = #32455#36896#21333#21495
end
object ConNo: TEdit
@ -99,7 +97,7 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Left = 74
Top = 11
Width = 169
Height = 20
Height = 25
TabOrder = 0
OnChange = ConNoChange
end
@ -108,7 +106,7 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Left = 588
Top = 11
Width = 169
Height = 20
Height = 25
TabOrder = 1
OnChange = ConNoChange
end
@ -117,7 +115,7 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Left = 331
Top = 11
Width = 169
Height = 20
Height = 25
TabOrder = 2
OnChange = ConNoChange
end
@ -129,9 +127,15 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Height = 476
Align = alClient
BorderStyle = cxcbsNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #24494#36719#38597#40657
Font.Style = []
ParentFont = False
PopupMenu = PM_1
TabOrder = 2
ExplicitTop = 88
ExplicitTop = 80
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -300,14 +304,6 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
HeaderGlyphAlignmentHorz = taCenter
Width = 88
end
object TV1Column2: TcxGridDBColumn
Caption = #24050#30003#35831#25968#37327
DataBinding.FieldName = 'SQQty'
DataBinding.IsNullValueType = True
FooterAlignmentHorz = taCenter
HeaderAlignmentHorz = taCenter
Width = 91
end
object TV1Column15: TcxGridDBColumn
Caption = #32433#32447#29992#37327
DataBinding.FieldName = 'SXQty'
@ -324,6 +320,14 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
Options.Editing = False
Width = 100
end
object TV1Column2: TcxGridDBColumn
Caption = #24050#30003#35831#25968#37327
DataBinding.FieldName = 'SQQty'
DataBinding.IsNullValueType = True
FooterAlignmentHorz = taCenter
HeaderAlignmentHorz = taCenter
Width = 91
end
object TV1Column4: TcxGridDBColumn
Caption = #24050#39046#29992#25968#37327
DataBinding.FieldName = 'LYQty'
@ -4676,12 +4680,6 @@ inherited frmSalesContract_ZZDSXSel: TfrmSalesContract_ZZDSXSel
TextColor = clBlack
end
object Default: TcxStyle
AssignedValues = [svFont]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object QHuangSe: TcxStyle
AssignedValues = [svColor, svFont]

View File

@ -165,19 +165,22 @@ begin
begin
Close;
sql.Clear;
SQL.Add('SELECT A.*,B.*,C.*');
SQL.Add(' ,SXQty=round(OrdQty*C.MeterQty/1000,2)');
SQL.Add(' ,SQQty=(select Sum(Y.Qty) from Pur_YarnPlan_Main X ');
SQL.Add('INNER JOIN Pur_YarnPlan_Sub Y on X.PurMId =Y.PurMId ');
SQL.Add('where isnull(X.LX,'''') = ''Ö¯Ôìµ¥'' and X.OrderNo =A.OrderNo and ');
SQL.Add('isnull(X.status,''0'')=''-1'') ');
sql.Add(' from Tat_Plan_Main A inner join Tat_Plan_Sub B on A.Mainid=B.MainId');
sql.Add(' inner join Tat_Plan_Yarn C on A.Mainid=C.MainId');
SQL.Add('WHERE A.Status = ''9'' and C.Y_Code <> '''' ');
SQL.Add('SELECT A.*, B.*, C.*');
SQL.Add(', SXQty = round(OrdQty * C.MeterQty / 1000, 2)');
SQL.Add(', SQQty = (SELECT SUM(Y.Qty) FROM Pur_YarnPlan_Main X');
SQL.Add(' INNER JOIN Pur_YarnPlan_Sub Y ON X.PurMId = Y.PurMId');
SQL.Add(' WHERE ISNULL(X.LX, '''') = ''Ö¯Ôìµ¥''');
SQL.Add(' AND X.OrderNo = A.OrderNo');
SQL.Add(' AND ISNULL(X.status, ''0'') = ''-1'')');
SQL.Add(', LYQty = (SELECT SUM(X.Qty) FROM BS_Yarn_IO X');
SQL.Add(' WHERE X.IOFlag = ''³ö¿â''');
SQL.Add(' AND X.ToOrdNo = A.OrderNo');
SQL.Add(' AND X.Y_Code = C.Y_Code)');
SQL.Add('FROM Tat_Plan_Main A');
SQL.Add('INNER JOIN Tat_Plan_Sub B ON A.Mainid = B.MainId');
SQL.Add('INNER JOIN Tat_Plan_Yarn C ON A.Mainid = C.MainId');
SQL.Add('WHERE A.Status = ''9''');
SQL.Add('AND C.Y_Code <> ''''');
Open;
end;
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));

View File

@ -111,8 +111,6 @@ inherited frmTatClothInfoSel: TfrmTatClothInfoSel
Height = 508
Align = alClient
TabOrder = 0
ExplicitLeft = 17
ExplicitTop = 37
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
Navigator.Buttons.CustomButtons = <>

View File

@ -12,7 +12,23 @@ uses
cxLookAndFeelPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu,
System.ImageList, U_BaseInput, cxTL, cxMaskEdit, cxTLdxBarBuiltInMenu,
cxCheckBox, cxInplaceContainer, cxDBTL, cxTLData, math, dxScrollbarAnnotations,
dxSkinsCore, dxSkinsDefaultPainters;
dxSkinsCore, dxSkinsDefaultPainters, dxSkinBasic, dxSkinBlack, dxSkinBlue,
dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatClothInfoSel = class(TfrmBaseHelp)

View File

@ -118,7 +118,6 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel
Align = alClient
PopupMenu = PM_1
TabOrder = 2
ExplicitLeft = 1
object Tv1: TcxGridDBTableView
OnDblClick = TV1DblClick
Navigator.Buttons.CustomButtons = <>

View File

@ -12,7 +12,23 @@ uses
cxLookAndFeelPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu,
System.ImageList, U_BaseInput, cxButtonEdit, cxCheckBox, Vcl.Menus,
dxScrollbarAnnotations, cxContainer, cxImageList, dxSkinsCore,
dxSkinsDefaultPainters;
dxSkinsDefaultPainters, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmYarnInfoSel = class(TfrmBaseHelp)

View File

@ -1,74 +1,46 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>1899-12-30 00:00:00.000.333,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.342,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.227,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeInPut.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXInPut.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.227,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeInPut.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.956,=D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_EmployeeList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.744,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.dfm=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Customer.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.531,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.294,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.708,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_Customer.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.990,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_BankInput.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_CustomerInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.213,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.387,=D:\Dp10RepoV1\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.175,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.762,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_SYDept.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXDept.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.829,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_EmployeeInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.967,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_CustInput.pas=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_FactoryInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.990,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_BankInput.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_CustomerInput.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_YGSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.921,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.pas=D:\Dp10Repo\项目代码\鹏华\员工管理(StaffManage.dll)\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.744,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.pas=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Customer.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.076,D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_ZdyAttachGYS.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.069,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.863,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_FactoryInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.762,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_SYDept.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXDept.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.435,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.385,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.033,D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_ZDYHelp.dfm=D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_YGSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.222,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_Company.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.592,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.213,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.033,D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_ZDYHelp.pas=D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_YGSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.921,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.dfm=D:\Dp10Repo\项目代码\鹏华\员工管理(StaffManage.dll)\U_CompanySel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.525,=D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_BankList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.618,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_CustomerInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.967,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_CustInput.dfm=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_FactoryInput.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.373,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_SYDept.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.333,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.342,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.227,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeInPut.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXInPut.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.227,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeInPut.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.956,=D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_EmployeeList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.744,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.dfm=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Customer.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.531,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.294,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.708,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_Customer.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.990,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_BankInput.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_CustomerInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.213,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.387,=D:\Dp10RepoV1\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.175,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.762,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_SYDept.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXDept.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.829,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_EmployeeInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.967,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_CustInput.pas=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_FactoryInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.990,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_BankInput.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\U_CustomerInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_YGSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.921,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.pas=D:\Dp10Repo\项目代码\鹏华\员工管理(StaffManage.dll)\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.744,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.pas=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Customer.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.076,D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_ZdyAttachGYS.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.069,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.435,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.762,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_SYDept.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXDept.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.863,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_FactoryInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.385,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.033,D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_ZDYHelp.dfm=D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_YGSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.222,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_Company.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.592,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.213,D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_EmployeeList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A01基础公司管理\U_LXList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.033,D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_ZDYHelp.pas=D:\Dp10Repo\项目代码\瑜量\客户供应商管理(Company.dll)\U_YGSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.921,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_Company.dfm=D:\Dp10Repo\项目代码\鹏华\员工管理(StaffManage.dll)\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.525,=D:\Dp10Repo\项目代码\RTBasics\A01基础公司管理\U_BankList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.618,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_CustomerInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.967,D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_CustInput.dfm=D:\Dp10Repo\项目代码\鹏华\客户供应商管理(Company.dll)\U_FactoryInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.373,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A01基础公司管理\U_SYDept.pas</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="android-support-v4.dex.jar"/>
<File Path="cloud-messaging.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-base.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-identifier.16.0.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-lite.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-analytics-impl.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-analytics.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-base.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-basement.16.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-gass.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-identity.16.0.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-maps.16.1.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-measurement-base.16.4.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-measurement-sdk-api.16.4.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-stats.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-tagmanager-v4-impl.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-tasks.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-wallet.16.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-analytics.16.4.0.dex.jar"/>
<File Path="com-google-firebase.firebase-common.16.1.0.dex.jar"/>
<File Path="com-google-firebase.firebase-iid-interop.16.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-iid.17.1.1.dex.jar"/>
<File Path="com-google-firebase.firebase-measurement-connector.17.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-messaging.17.5.0.dex.jar"/>
<File Path="fmx.dex.jar"/>
<File Path="google-play-billing.dex.jar"/>
<File Path="google-play-licensing.dex.jar"/>
<File Path="..\..\D10SZKaiXiYa"/>
<File Path="..\A00通用窗体"/>
<File Path="..\A00通用窗体\U_AttachmentUpload.pas"/>

Binary file not shown.

View File

@ -3,7 +3,7 @@ object frmYGInPut: TfrmYGInPut
Top = 31
Caption = #21592#24037#26723#26696#24405#20837
ClientHeight = 532
ClientWidth = 1429
ClientWidth = 1432
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -19,7 +19,7 @@ object frmYGInPut: TfrmYGInPut
Tag = 1
Left = 0
Top = 0
Width = 1429
Width = 1432
Height = 30
AutoSize = True
ButtonHeight = 30
@ -82,10 +82,11 @@ object frmYGInPut: TfrmYGInPut
object cxGrid1: TcxGrid
Left = 0
Top = 30
Width = 1429
Width = 1432
Height = 502
Align = alClient
TabOrder = 1
ExplicitWidth = 1429
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -120,10 +121,24 @@ object frmYGInPut: TfrmYGInPut
Options.Editing = False
Width = 80
end
object Tv1Column14: TcxGridDBColumn
Caption = #26159#21542#31995#32479#36134#21495
DataBinding.FieldName = 'SFXTZH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 115
end
object v1GangWei: TcxGridDBColumn
Caption = #23703#20301
DataBinding.FieldName = 'Post'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1GangWeiPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 82
end
@ -362,13 +377,6 @@ object frmYGInPut: TfrmYGInPut
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv1Column7: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv1Column32: TcxGridDBColumn
Caption = #31038#20445#21495
DataBinding.FieldName = 'SocialSecurityNumber'
@ -398,6 +406,13 @@ object frmYGInPut: TfrmYGInPut
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv1Column7: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv1Column34: TcxGridDBColumn
Caption = #31038#20445#32564#32435#22522#25968
DataBinding.FieldName = 'Socialsecuritybase'

View File

@ -108,6 +108,7 @@ type
Tv1Column52: TcxGridDBColumn;
cxgrdbclmnTv1Column14: TcxGridDBColumn;
btn1: TToolButton;
Tv1Column14: TcxGridDBColumn;
procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure TBSaveClick(Sender: TObject);
@ -116,6 +117,8 @@ type
procedure v1SYRNamePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure v1Column2PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure btn1Click(Sender: TObject);
procedure v1GangWeiPropertiesButtonClick(Sender: TObject;
AButtonIndex: Integer);
private
TPInt: Integer;
procedure InitData();
@ -385,5 +388,28 @@ begin
end;
end;
procedure TfrmYGInPut.v1GangWeiPropertiesButtonClick(Sender: TObject;
AButtonIndex: Integer);
begin
try
frmZDYHelp := TfrmZDYHelp.Create(Application);
with frmZDYHelp do
begin
Flag := 'Post';
flagname := '¸ÚλѡÔñ';
if ShowModal = 1 then
begin
with Order_Sub do
begin
Edit;
FieldByName('Post').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
end;
end;
end;
finally
frmZDYHelp.Free;
end;
end;
end.

View File

@ -408,6 +408,8 @@ inherited frmEmployeeList: TfrmEmployeeList
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
ExplicitLeft = 6
ExplicitTop = 37
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

Binary file not shown.

View File

@ -1,81 +1,81 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>1899-12-30 00:00:00.000.208,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\JDAESExtend.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.754,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.dfm=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_TatClothInfo.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.472,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.074,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.418,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A02基础产品管理\U_ClothInfoInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.993,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ReportImgSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.558,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.893,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_ReceivableEdit_XT.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.243,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\untAES.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.096,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo_CB.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.536,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.034,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\uSZHN_JSON.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.816,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.754,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.pas=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_TatClothInfo.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.921,=D:\Dp10RepoV1\public10\ThreeFun\Form\U_SysLogHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.003,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.346,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.441,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A02基础产品管理\U_ClothInfo.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.337,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.226,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut2.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.431,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.dfm=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.980,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\uFomat_JSON.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.325,=D:\Dp10RepoV1\项目代码\花蝴蝶\A02基础产品管理\U_TatClothInfoInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.155,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\ElAES.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用模板\ClothInfo.dproj=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\InformationBase.dproj</Transaction>
<Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.340,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_CloInfoFileUp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.096,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo_CB.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.629,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.272,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_YarnInList_Sel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.743,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.833,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateTimeSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.504,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothType.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.217,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.228,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.431,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.pas=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.518,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.290,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.503,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.129,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfoImport.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.893,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_ReceivableEdit_XT.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.684,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.226,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut2.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.944,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\U_HttpFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.290,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.208,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\JDAESExtend.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.754,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.dfm=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_TatClothInfo.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.472,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.074,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.993,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ReportImgSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.558,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.893,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_ReceivableEdit_XT.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.243,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\untAES.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.096,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo_CB.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.536,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.003,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.816,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.754,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.pas=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_TatClothInfo.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.921,=D:\Dp10RepoV1\public10\ThreeFun\Form\U_SysLogHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.034,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.346,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.441,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A02基础产品管理\U_ClothInfo.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.337,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.226,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut2.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.431,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.dfm=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.980,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\uFomat_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.418,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A02基础产品管理\U_ClothInfoInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.325,=D:\Dp10RepoV1\项目代码\花蝴蝶\A02基础产品管理\U_TatClothInfoInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.155,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\AES\ElAES.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用模板\ClothInfo.dproj=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\InformationBase.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.340,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_CloInfoFileUp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.096,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_TatClothInfo_CB.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.629,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.272,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_YarnInList_Sel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.743,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.504,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothType.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.217,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.833,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateTimeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.228,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.431,D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo.pas=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfo_Tat.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.305,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.503,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.290,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.518,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.129,=D:\Dp10Repo\项目代码\RTBasics\A02基础产品管理\U_ClothInfoImport.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.893,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_ReceivableEdit_XT.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_ReceivableEdit.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.684,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.226,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut2.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.944,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用方法\U_HttpFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.290,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.305,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.dfm</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="..\..\D10szKaiXiYa"/>
<File Path="..\..\D10SZKaiXiYa"/>
<File Path="..\A00通用方法"/>
<File Path="..\A00通用方法\AES"/>
<File Path="..\A00通用方法\AES\ElAES.pas"/>

View File

@ -88,7 +88,7 @@ inherited frmClothType: TfrmClothType
OptionsView.Headers = False
RootValue = -1
ScrollbarAnnotations.CustomAnnotations = <>
TabOrder = 1
TabOrder = 4
OnClick = cxDBTreeList1Click
object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn
DataBinding.FieldName = 'CTName'
@ -162,7 +162,7 @@ inherited frmClothType: TfrmClothType
Top = 245
ExplicitLeft = 385
ExplicitTop = 245
ExplicitHeight = 28
ExplicitHeight = 29
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_ClothInfo.ADOLink

View File

@ -8,7 +8,23 @@ uses
cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin, StdCtrls,
ExtCtrls, DBClient, U_BaseList, cxLookAndFeels, cxLookAndFeelPainters,
cxTLdxBarBuiltInMenu, dxSkinsDefaultPainters, cxContainer, cxEdit,
dxSkinsCore, cxFilter, dxScrollbarAnnotations, cxProgressBar;
dxSkinsCore, cxFilter, dxScrollbarAnnotations, cxProgressBar, dxSkinBasic,
dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee,
dxSkinDarkroom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast,
dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky,
dxSkinMcSkin, dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinOffice2016Colorful,
dxSkinOffice2016Dark, dxSkinOffice2019Black, dxSkinOffice2019Colorful,
dxSkinOffice2019DarkGray, dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven,
dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, dxSkinSilver,
dxSkinSpringtime, dxSkinStardust, dxSkinSummer2008, dxSkinTheAsphaltWorld,
dxSkinTheBezier, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue;
type
TfrmClothType = class(TfrmBaseList)

View File

@ -359,7 +359,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
Align = alClient
PopupMenu = PM_1
TabOrder = 0
ExplicitLeft = 4
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
Navigator.Buttons.CustomButtons = <>
@ -752,7 +751,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
Height = 337
Align = alClient
TabOrder = 1
ExplicitLeft = 0
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -1103,9 +1101,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
object cxTabSheet3: TcxTabSheet
Caption = #26679#21697#22270#29255
ImageIndex = 2
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object GroupBox1: TGroupBox
Left = 0
Top = 0
@ -1129,9 +1124,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
object cxTabSheet4: TcxTabSheet
Caption = #36215#32508#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object QZF: TMemo
Tag = 2
Left = 0
@ -1153,9 +1145,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
object cxTabSheet5: TcxTabSheet
Caption = #31359#32508#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object CZF: TMemo
Tag = 2
Left = 0
@ -1177,9 +1166,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
object cxTabSheet6: TcxTabSheet
Caption = #31359#31576#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object CKF: TMemo
Tag = 2
Left = 0

View File

@ -9,6 +9,7 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
Font.Height = -16
OldCreateOrder = True
Position = poScreenCenter
ExplicitTop = -236
ExplicitWidth = 1556
ExplicitHeight = 776
PixelsPerInch = 96
@ -597,6 +598,8 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
Align = alClient
PopupMenu = PM_1
TabOrder = 1
ExplicitLeft = -2
ExplicitTop = 0
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -734,7 +737,14 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 80
Width = 96
end
object TV1Column14: TcxGridDBColumn
Caption = #25903#25968
DataBinding.FieldName = 'Z_Number'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 71
end
object TV1Column9: TcxGridDBColumn
Caption = #25104#20998
@ -829,6 +839,7 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
Align = alClient
PopupMenu = PM_2
TabOrder = 1
ExplicitLeft = -2
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -968,6 +979,13 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column14: TcxGridDBColumn
Caption = #25903#25968
DataBinding.FieldName = 'Z_Number'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 88
end
object Tv2Column8: TcxGridDBColumn
Caption = #31859'/'#24212#29992#37327
DataBinding.FieldName = 'MeterQty'

View File

@ -180,6 +180,8 @@ type
Label22: TLabel;
WeiSha: TcxTextEdit;
LPDW: TcxComboBox;
TV1Column14: TcxGridDBColumn;
Tv2Column14: TcxGridDBColumn;
procedure FormShow(Sender: TObject);
procedure TBCloseClick(Sender: TObject);
procedure ToolButton1Click(Sender: TObject);
@ -1150,7 +1152,7 @@ begin
FieldByName('Brand').Value := frmYarnInfoSel.CDS_1.fieldbyname('Brand').Value;
FieldByName('Y_Composition').Value := frmYarnInfoSel.CDS_1.fieldbyname('Y_Composition').Value;
FieldByName('TestDenier').Value := frmYarnInfoSel.CDS_1.fieldbyname('Denier').Value;
FieldByName('Z_Number').Value := frmYarnInfoSel.CDS_1.fieldbyname('ZS').Value;
Post;
end;
@ -1502,6 +1504,7 @@ begin
FieldByName('Brand').Value := frmYarnInfoSel.CDS_1.fieldbyname('Brand').Value;
FieldByName('Y_Composition').Value := frmYarnInfoSel.CDS_1.fieldbyname('Y_Composition').Value;
FieldByName('TestDenier').Value := frmYarnInfoSel.CDS_1.fieldbyname('Denier').Value;
FieldByName('Z_Number').Value := frmYarnInfoSel.CDS_1.fieldbyname('ZS').Value;
Post;
end;

View File

@ -1,85 +1,85 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.659,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.575,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.441,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.398,=D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.423,=D:\Dp10RepoV1\项目代码\RTBasicsV1\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.074,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.pas=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.024,=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.525,D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.237,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList_XT.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.575,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.569,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.441,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.024,=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\E01梭织生产计划\U_PictureUpload22.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.325,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.237,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList_XT.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.375,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_ReceivableEdit_XT.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.726,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.pas=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.272,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10RepoV1\项目代码\D10szJinCheng\E01梭织生产计划\U_PictureUpload22.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.526,=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.726,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.pas=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.847,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.707,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.237,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList_XT.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.695,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_UserSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.009,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.359,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.444,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.419,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A00通用窗体\U_BankSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.709,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.526,=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.707,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.847,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.695,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_UserSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.634,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.620,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理1\Contract.dproj=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理1\InformationBase.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.074,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.dfm=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.444,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.359,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.709,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.074,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.564,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.074,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesConInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.620,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理1\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理1\Contract.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.242,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.726,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.dfm=D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.582,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.634,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.603,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.519,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.520,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.690,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.522,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.348,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.428,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.634,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.348,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.522,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.009,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.993,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.690,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.676,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.726,D:\Dp10Repo\项目代码\RTBasics\B01基础合同管理\U_SalesContractList.dfm=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.519,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.009,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.157,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.556,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.325,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.525,D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.950,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.603,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.634,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10RepoV1\项目代码\D10szJinCheng\E01梭织生产计划\U_PictureUpload22.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.425,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.472,=D:\Dp10RepoV1\项目代码\花蝴蝶\B01基础合同管理\U_SalesConInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.157,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.525,D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.237,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList_XT.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B01基础合同管理\U_SalesContractList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\E01梭织生产计划\U_PictureUpload22.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.009,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LableMapSet.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.525,D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_PictureUpload.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\B01基础合同管理\U_PictureUpload11.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_PictureUpload.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\PictureUpload.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.067,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.472,=D:\Dp10RepoV1\项目代码\花蝴蝶\B01基础合同管理\U_SalesConInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.950,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.556,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="..\..\D10SZKaiXiYa"/>

View File

@ -3,9 +3,9 @@
<Transactions>
<Transaction>1899/12/30 00:00:00.000.334,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.674,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_testdll.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.517,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.687,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
@ -17,18 +17,18 @@
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.803,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnInfoList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.356,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B03基础物料仓库\U_JWLPurchasePlanSel.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_YarnPurchasePlanSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.376,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.969,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutReturnList.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.969,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutReturnList.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.670,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutInput1.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.224,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.376,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.670,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutInput1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.224,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.688,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutReturnList.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutReturnList1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.878,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.065,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.800,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_CPSelBig.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.536,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_ProductInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.642,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.887,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
@ -41,13 +41,13 @@
<Transaction>1899/12/30 00:00:00.000.572,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.800,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_CPSelBig.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.891,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.008,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.800,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.008,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.983,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\Unit1.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.802,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.356,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B03基础物料仓库\U_JWLPurchasePlanSel.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.981,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.907,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\YarnStk.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.073,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutWBList.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutInput1.pas</Transaction>
@ -59,11 +59,11 @@
<Transaction>1899/12/30 00:00:00.000.534,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.511,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnPurchasePlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.006,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A00通用窗体\U_CJDJ.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\B02基础纱线仓库\U_CJDJ.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.209,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.802,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.224,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.356,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B03基础物料仓库\U_JWLPurchasePlanSel.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.209,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_YarnPurchasePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.316,=D:\Dp10Repo\项目代码\路尚\T00贸易通用窗体\U_PurchaseContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>

View File

@ -7,12 +7,12 @@
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.621,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas</Transaction>

View File

@ -13,8 +13,13 @@ inherited DataLink_PurchasePlan: TDataLink_PurchasePlan
end
inherited ThreeColorBase: TcxStyleRepository
PixelsPerInch = 96
inherited grid_head_blue: TcxStyle
Font.Height = -12
Font.Style = [fsBold]
end
inherited grid_head_red: TcxStyle
Font.Height = -17
Font.Height = -12
Font.Style = [fsBold]
TextColor = clRed
end
end

View File

@ -7,8 +7,6 @@ inherited frmYarnPurchasePlanList: TfrmYarnPurchasePlanList
Font.Height = -16
FormStyle = fsMDIChild
Visible = True
ExplicitLeft = -222
ExplicitTop = -245
ExplicitWidth = 1380
ExplicitHeight = 774
PixelsPerInch = 96
@ -184,6 +182,7 @@ inherited frmYarnPurchasePlanList: TfrmYarnPurchasePlanList
Align = alClient
PopupMenu = pm1
TabOrder = 3
ExplicitTop = 162
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -855,6 +854,8 @@ inherited frmYarnPurchasePlanList: TfrmYarnPurchasePlanList
Top = 243
end
object cxStyleRepository1: TcxStyleRepository
Left = 40
Top = 16
PixelsPerInch = 96
object cxStyle1: TcxStyle
end

View File

@ -1212,7 +1212,6 @@ begin
sql.Add(',' + quotedstr(trim('采购计划ID' + trim(MPurMIdS))));
sql.Add(',' + quotedstr(trim('成功')));
sql.Add(')');
sql.Add(' exec P_Pur_YarnPlan_SetStatus ');
sql.Add(' @PurMIdS=' + QuotedStr(MPurMIdS));
sql.Add(',@Operation=''撤销提交'' ');

View File

@ -81,6 +81,7 @@ inherited frmYarnPurchasePlanPut_ZZD: TfrmYarnPurchasePlanPut_ZZD
AutoSize = True
Caption = #32433#32447#26723#26696
ImageIndex = 2
Visible = False
OnClick = ToolButton1Click
end
object ToolButton4: TToolButton
@ -89,6 +90,7 @@ inherited frmYarnPurchasePlanPut_ZZD: TfrmYarnPurchasePlanPut_ZZD
AutoSize = True
Caption = #26426#29289#26009#26723#26696
ImageIndex = 2
Visible = False
OnClick = ToolButton4Click
end
object ToolButton5: TToolButton
@ -96,6 +98,7 @@ inherited frmYarnPurchasePlanPut_ZZD: TfrmYarnPurchasePlanPut_ZZD
Top = 0
Caption = #38144#21806#21512#21516
ImageIndex = 2
Visible = False
OnClick = ToolButton5Click
end
object ToolButton2: TToolButton
@ -116,7 +119,6 @@ inherited frmYarnPurchasePlanPut_ZZD: TfrmYarnPurchasePlanPut_ZZD
BorderStyle = cxcbsNone
TabOrder = 2
ExplicitLeft = -6
ExplicitTop = 183
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -202,8 +202,23 @@ begin
end;
procedure TfrmTatGYSel.ToolButton1Click(Sender: TObject);
procedure TfrmTatGYSel.ToolButton1Click(Sender: TObject); //选择
begin
if (ADOQueryMain.IsEmpty) or (CDS_1.IsEmpty) then
begin
ShowMessage('请先选择数据行!');
Exit;
end;
if (ADOQueryMain.FieldByName('C_Code').AsString = '') or (ADOQueryMain.FieldByName('C_Code').IsNull) then
begin
ShowMessage('请先选择产品信息!');
Exit;
end;
if (ADOQueryMain.FieldByName('C_Name').AsString = '') or (ADOQueryMain.FieldByName('C_Name').IsNull) then
begin
ShowMessage('请先选择产品信息!');
Exit;
end;
ModalResult := 1;
end;

View File

@ -25,15 +25,9 @@ inherited frmTatPlanSel: TfrmTatPlanSel
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = ImageList1
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
@ -291,300 +285,320 @@ inherited frmTatPlanSel: TfrmTatPlanSel
OnChange = OrderNoChange
end
end
object cxGrid1: TcxGrid [2]
object cxTabControl1: TcxTabControl [2]
Left = 0
Top = 97
Width = 1637
Height = 546
Align = alClient
TabOrder = 2
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = v1Column6
Properties.CustomButtons.Buttons = <>
Properties.TabIndex = 0
Properties.Tabs.Strings = (
#24453#24320#22987
#24050#24320#22987
#24050#32467#26463
#20840#37096)
OnChange = cxTabControl1Change
ClientRectBottom = 544
ClientRectLeft = 2
ClientRectRight = 1635
ClientRectTop = 28
object cxGrid1: TcxGrid
Left = 2
Top = 28
Width = 1633
Height = 516
Align = alClient
TabOrder = 0
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = v1Column6
end
item
Kind = skSum
Column = v1Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v1OrderNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
item
Kind = skSum
Column = v1Column6
object Tv1Column2: TcxGridDBColumn
Caption = #32455#36896#21333#21495
DataBinding.FieldName = 'OrderNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 91
end
item
Kind = skSum
object v1Column31: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
item
Kind = skSum
object v1Column5: TcxGridDBColumn
Caption = #19979#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 109
end
item
Kind = skSum
object Tv1Column1: TcxGridDBColumn
Caption = #21152#24037#21333#20301
DataBinding.FieldName = 'FtyCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 102
end
item
Kind = skSum
object v1Column19: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 102
end
item
Kind = skSum
Position = spFooter
object v1Column21: TcxGridDBColumn
Caption = #22383#24067#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
item
Kind = skSum
Position = spFooter
object v1Column2: TcxGridDBColumn
Caption = #22383#24067#21517#31216
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 87
end
item
Kind = skSum
Position = spFooter
object Tv1Column9: TcxGridDBColumn
Caption = #25972#32463#24037#33402#32534#21495
DataBinding.FieldName = 'WB_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
object Tv1Column7: TcxGridDBColumn
Caption = #25972#32463#24037#33402#21517#31216
DataBinding.FieldName = 'WB_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
end
item
Kind = skSum
object Tv1Column4: TcxGridDBColumn
Caption = #26426#22411
DataBinding.FieldName = 'LoomType'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
item
Kind = skSum
object v1PRTKZ: TcxGridDBColumn
Caption = #29702#35770#24179#26041#20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 131
end
item
Kind = skSum
Column = v1Column6
object v1Column3: TcxGridDBColumn
Caption = #23454#27979#24179#26041#20811#37325
DataBinding.FieldName = 'C_TestGramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 112
end
item
Kind = skSum
object Tv1Column3: TcxGridDBColumn
Caption = #32428#23494
DataBinding.FieldName = 'C_FinishLatitudeDensity'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 88
end
item
Kind = skSum
object v1Column6: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'OrdPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
item
Kind = skSum
object v1Column7: TcxGridDBColumn
Caption = #21305#38271
DataBinding.FieldName = 'OrdPieceLen'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 60
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #24635#25968#37327
DataBinding.FieldName = 'OrdQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1PRTMF: TcxGridDBColumn
Caption = #31576#24133
DataBinding.FieldName = 'C_ReedWidth'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column8: TcxGridDBColumn
Caption = #31576#21495
DataBinding.FieldName = 'C_ReedNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column5: TcxGridDBColumn
Caption = #24635#22836#32441
DataBinding.FieldName = 'C_YarnQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column11: TcxGridDBColumn
Caption = #19978#26426#38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column12: TcxGridDBColumn
Caption = #25104#21697#38376#24133
DataBinding.FieldName = 'C_FinishWidth'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column13: TcxGridDBColumn
Caption = #29256#26412#32534#21495
DataBinding.FieldName = 'BBNO'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column15: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object Tv1Column6: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column16: TcxGridDBColumn
Caption = #21046#21333#20154
DataBinding.FieldName = 'Filler'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v1Column4: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v1OrderNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column2: TcxGridDBColumn
Caption = #32455#36896#21333#21495
DataBinding.FieldName = 'OrderNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 91
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
object v1Column31: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column5: TcxGridDBColumn
Caption = #19979#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 109
end
object Tv1Column1: TcxGridDBColumn
Caption = #21152#24037#21333#20301
DataBinding.FieldName = 'FtyCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 102
end
object v1Column19: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 102
end
object v1Column21: TcxGridDBColumn
Caption = #22383#24067#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object v1Column2: TcxGridDBColumn
Caption = #22383#24067#21517#31216
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 87
end
object Tv1Column9: TcxGridDBColumn
Caption = #25972#32463#24037#33402#32534#21495
DataBinding.FieldName = 'WB_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
end
object Tv1Column7: TcxGridDBColumn
Caption = #25972#32463#24037#33402#21517#31216
DataBinding.FieldName = 'WB_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
end
object Tv1Column4: TcxGridDBColumn
Caption = #26426#22411
DataBinding.FieldName = 'LoomType'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object v1PRTKZ: TcxGridDBColumn
Caption = #29702#35770#24179#26041#20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 131
end
object v1Column3: TcxGridDBColumn
Caption = #23454#27979#24179#26041#20811#37325
DataBinding.FieldName = 'C_TestGramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 112
end
object Tv1Column3: TcxGridDBColumn
Caption = #32428#23494
DataBinding.FieldName = 'C_FinishLatitudeDensity'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 88
end
object v1Column6: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'OrdPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column7: TcxGridDBColumn
Caption = #21305#38271
DataBinding.FieldName = 'OrdPieceLen'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 60
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #24635#25968#37327
DataBinding.FieldName = 'OrdQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1PRTMF: TcxGridDBColumn
Caption = #31576#24133
DataBinding.FieldName = 'C_ReedWidth'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column8: TcxGridDBColumn
Caption = #31576#21495
DataBinding.FieldName = 'C_ReedNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column5: TcxGridDBColumn
Caption = #24635#22836#32441
DataBinding.FieldName = 'C_YarnQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv1Column11: TcxGridDBColumn
Caption = #19978#26426#38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column12: TcxGridDBColumn
Caption = #25104#21697#38376#24133
DataBinding.FieldName = 'C_FinishWidth'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column13: TcxGridDBColumn
Caption = #29256#26412#32534#21495
DataBinding.FieldName = 'BBNO'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column15: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object Tv1Column6: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1Column16: TcxGridDBColumn
Caption = #21046#21333#20154
DataBinding.FieldName = 'Filler'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v1Column4: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
inherited ADOQueryBaseCmd: TADOQuery

View File

@ -27,7 +27,7 @@ uses
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
dxSkinXmas2008Blue, cxPC;
type
TfrmTatPlanSel = class(TfrmBaseHelp)
@ -96,6 +96,7 @@ type
cxGrid1Level1: TcxGridLevel;
Tv1Column7: TcxGridDBColumn;
Tv1Column9: TcxGridDBColumn;
cxTabControl1: TcxTabControl;
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormShow(Sender: TObject);
@ -105,6 +106,7 @@ type
procedure OrderNoChange(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure Tv1DblClick(Sender: TObject);
procedure cxTabControl1Change(Sender: TObject);
private
procedure InitGrid();
{ Private declarations }
@ -146,6 +148,11 @@ begin
frmTatPlanSel := nil;
end;
procedure TfrmTatPlanSel.cxTabControl1Change(Sender: TObject);
begin
InitGrid();
end;
procedure TfrmTatPlanSel.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := cahide;
@ -162,9 +169,29 @@ begin
sql.Add(' select *,PZQty=(select count(*) from Tat_WB_Card X where X.OrderNo =A.OrderNo)');
sql.Add(',ZS=(select ZS from Bs_Cloth_Info X where X.C_Code =B.C_Code) ');
sql.Add(' from Tat_Plan_Main A inner join Tat_Plan_Sub B on A.MainId=B.MainId');
sql.Add(' where isnull(A.status,''0'')=''9'' ');
// ShowMessage(sql.Text);
//SQL.Add(' where isnull(A.status,''0'')=''9'' ');
sql.add('where 1=1');
case cxTabControl1.TabIndex of
0:
begin
sql.Add('and isnull(Status,''0'') =''0'' ');
end;
1:
begin
sql.Add('and isnull(Status,''0'') =''9'' ');
end;
2:
begin
sql.Add('and isnull(Status,''0'') =''10'' ');
// sql.Add(' and A.FillTIme>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
// sql.Add(' and A.FillTIme<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
end;
3:
begin
sql.Add('and isnull(Status,''0'') not in (''11'',''22'') ');
end;
end;
sql.add('order by A.FILLTIME DESC');
Open;
end;
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));

View File

@ -2,7 +2,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 212
Top = 14
Caption = #24037#33402#21333#24405#20837
ClientHeight = 766
ClientHeight = 758
ClientWidth = 1540
Color = clWhite
Font.Charset = GB2312_CHARSET
@ -10,13 +10,13 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Position = poScreenCenter
WindowState = wsMaximized
ExplicitWidth = 1556
ExplicitHeight = 805
ExplicitHeight = 797
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 314
Top = 0
Width = 1540
Height = 30
AutoSize = True
@ -63,7 +63,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
end
object ScrollBox1: TScrollBox [1]
Left = 0
Top = 0
Top = 30
Width = 1540
Height = 314
Align = alTop
@ -330,7 +330,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
object OrdPieceLen: TcxTextEdit
Tag = 2
Left = 952
Top = 112
Top = 113
Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged
TabOrder = 2
OnKeyPress = ConNoKeyPress
@ -429,7 +429,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
object C_GramWeight: TcxTextEdit
Tag = 2
Left = 679
Top = 77
Top = 79
ParentColor = True
TabOrder = 11
Width = 150
@ -437,7 +437,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
object C_ReedNo: TcxTextEdit
Tag = 2
Left = 398
Top = 148
Top = 150
ParentColor = True
TabOrder = 12
Width = 150
@ -445,7 +445,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
object C_ReedWidth: TcxTextEdit
Tag = 2
Left = 114
Top = 148
Top = 150
ParentColor = True
Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged
TabOrder = 13
@ -665,13 +665,13 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 344
Width = 1540
Height = 422
Height = 414
Align = alClient
TabOrder = 2
Properties.ActivePage = cxTabSheet2
Properties.ActivePage = cxTabSheet1
Properties.CustomButtons.Buttons = <>
Properties.Style = 9
ClientRectBottom = 422
ClientRectBottom = 414
ClientRectRight = 1540
ClientRectTop = 28
object cxTabSheet1: TcxTabSheet
@ -681,7 +681,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 931
Top = 0
Width = 609
Height = 394
Height = 386
Align = alClient
Caption = #32463#25490#21015
Font.Charset = GB2312_CHARSET
@ -696,7 +696,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 2
Top = 31
Width = 605
Height = 361
Height = 353
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -711,14 +711,14 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 0
Width = 931
Height = 394
Height = 386
Align = alLeft
TabOrder = 1
object cxPageControl2: TcxPageControl
Left = 1
Top = 1
Width = 929
Height = 392
Height = 384
Align = alClient
Color = clWhite
Font.Charset = GB2312_CHARSET
@ -733,7 +733,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Visible = False
Properties.CustomButtons.Buttons = <>
Properties.Style = 6
ClientRectBottom = 392
ClientRectBottom = 384
ClientRectRight = 929
ClientRectTop = 0
end
@ -741,7 +741,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 1
Top = 1
Width = 929
Height = 392
Height = 384
Align = alClient
TabOrder = 1
object TV1: TcxGridDBTableView
@ -937,7 +937,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 863
Top = 0
Width = 677
Height = 394
Height = 386
Align = alClient
Caption = #32428#25490#21015
Font.Charset = GB2312_CHARSET
@ -952,7 +952,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 2
Top = 31
Width = 673
Height = 361
Height = 353
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -967,14 +967,14 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 0
Width = 863
Height = 394
Height = 386
Align = alLeft
TabOrder = 1
object cxPageControl1: TcxPageControl
Left = 1
Top = 1
Width = 861
Height = 392
Height = 384
Align = alClient
Color = clWhite
Font.Charset = GB2312_CHARSET
@ -989,7 +989,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Visible = False
Properties.CustomButtons.Buttons = <>
Properties.Style = 6
ClientRectBottom = 392
ClientRectBottom = 384
ClientRectRight = 861
ClientRectTop = 0
end
@ -997,7 +997,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 1
Top = 1
Width = 861
Height = 392
Height = 384
Align = alClient
TabOrder = 1
object Tv2: TcxGridDBTableView
@ -1192,7 +1192,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
ImageIndex = 3
object cxGrid4: TcxGrid
Left = 0
Top = 352
Top = 344
Width = 1540
Height = 42
Align = alBottom
@ -1281,7 +1281,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 0
Width = 1540
Height = 352
Height = 344
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -1301,7 +1301,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 0
Width = 1540
Height = 394
Height = 386
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -1321,7 +1321,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 0
Top = 0
Width = 1540
Height = 394
Height = 386
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText

View File

@ -95,7 +95,6 @@ type
CDS_QZ: TClientDataSet;
ThroughHealdOrder: TcxMemo;
C_FinishLatitudeDensity: TcxTextEdit;
C_TestGramWeight: TcxTextEdit;
C_GramWeight: TcxTextEdit;
C_ReedNo: TcxTextEdit;
C_ReedWidth: TcxTextEdit;
@ -189,6 +188,7 @@ type
Tv2Column14: TcxGridDBColumn;
Label27: TLabel;
Label28: TLabel;
C_TestGramWeight: TcxTextEdit;
procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure TBSaveClick(Sender: TObject);
@ -218,12 +218,8 @@ type
procedure Tv2Column1PropertiesEditValueChanged(Sender: TObject);
procedure C_YarnQtyPropertiesEditValueChanged(Sender: TObject);
procedure WB_CodePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure TV1CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure Tv2CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TV1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
procedure Tv2CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
private
FXS, FGridFlag: Integer;
procedure InitData();
@ -239,6 +235,7 @@ type
public
PState, FCopyInt: Integer;
FConNo, FMainId, FSubId: string;
fStatus: Integer; //0新增, 1修改
{ Public declarations }
end;
@ -592,7 +589,6 @@ begin
begin
if GetLSNo(ADOQueryCmd, maxno, 'GY', 'Tat_Plan_Main', 4, 1) = False then
raise Exception.Create('生成流水号异常!');
OrderNo.Text := maxno;
end
else
@ -709,7 +705,7 @@ begin
FieldByName('MainId').Value := Trim(maxno);
FieldByName('SubId').Value := Trim(maxsubno);
FieldByName('YRId').Value := Trim(maxpbno);
RTSetSaveDataCDS(ADOQueryCmd, Tv2, CDS_1, 'Tat_Plan_Yarn', 0);
RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_1, 'Tat_Plan_Yarn', 0);
Post;
end;
CDS_1.Edit;
@ -732,7 +728,6 @@ begin
begin
if GetLSNo(ADOQueryTemp, maxpbno, 'RJ', 'Tat_Plan_Yarn', 4, 1) = False then
raise Exception.Create('取配比子流水号失败!');
end
else
begin
@ -912,7 +907,18 @@ begin
// Application.MessageBox('匹数非法数字!', '提示', 0);
// Exit;
// end;
with ADOQueryTemp do
begin
close;
SQL.Clear;
sql.Add('select * from Tat_Plan_Sub where C_Code = ' + QuotedStr(C_Code.Text));
Open;
end;
if (ADOQueryTemp.RecordCount <> 0) and (FStatus = 0) then
begin
Application.MessageBox('坯布编号重复!', '提示', 0);
Exit;
end;
if SaveData() then
begin
Application.MessageBox('保存成功!', '提示', 0);
@ -982,9 +988,7 @@ begin
CDS_QZ.EnableControls;
end;
procedure TfrmTatGYInPut.TV1CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TfrmTatGYInPut.TV1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
var
AColumn: TcxGridColumn;
AFieldName: string;
@ -1011,6 +1015,7 @@ begin
end;
end;
end;
procedure TfrmTatGYInPut.TV1Column1PropertiesEditValueChanged(Sender: TObject);
var
mvalue, FFieldName: string;
@ -1071,9 +1076,7 @@ begin
JSKZ();
end;
procedure TfrmTatGYInPut.Tv2CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TfrmTatGYInPut.Tv2CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
var
AColumn: TcxGridColumn;
AFieldName: string;
@ -1353,31 +1356,57 @@ begin
end;
end;
//procedure TfrmTatGYInPut.JSKZ();
//var
// SumJS, SumWS: double;
//begin
// ToolBar1.SetFocus;
//
// if Tv1.DataController.Summary.FooterSummaryValues[0] <> null then
// begin
// SumJS := Tv1.DataController.Summary.FooterSummaryValues[0];
// end
// else
// begin
// SumJS := 0;
// end;
//
// if Tv2.DataController.Summary.FooterSummaryValues[0] <> null then
// begin
// SumWS := Tv2.DataController.Summary.FooterSummaryValues[0];
// end
// else
// begin
// SumWS := 0;
// end;
//
// C_GramWeight.text := floattostr(roundfloat((SumJS + SumWS) / 3, 2));
//end;
procedure TfrmTatGYInPut.JSKZ();
var
SumJS, SumWS: double;
SumJS, SumWS, ReedWidthValue: Double;
ErrCode: Integer;
ReedWidthStr: string;
IsInch: Boolean;
begin
ToolBar1.SetFocus;
SumJS := IfThen(VarIsNull(Tv1.DataController.Summary.FooterSummaryValues[0]), 0, Tv1.DataController.Summary.FooterSummaryValues[0]);
if Tv1.DataController.Summary.FooterSummaryValues[0] <> null then
SumWS := IfThen(VarIsNull(Tv2.DataController.Summary.FooterSummaryValues[0]), 0, Tv2.DataController.Summary.FooterSummaryValues[0]);
ReedWidthStr := Trim(C_ReedWidth.Text);
IsInch := ContainsText(ReedWidthStr, '"');
ReedWidthStr := StringReplace(ReedWidthStr, 'CM', '', [rfReplaceAll, rfIgnoreCase]);
ReedWidthStr := StringReplace(ReedWidthStr, '"', '', [rfReplaceAll, rfIgnoreCase]);
ReedWidthStr := Trim(ReedWidthStr);
Val(ReedWidthStr, ReedWidthValue, ErrCode);
if (ErrCode = 0) and (ReedWidthValue > 0) then
begin
SumJS := Tv1.DataController.Summary.FooterSummaryValues[0];
if IsInch then
ReedWidthValue := ReedWidthValue * 0.0254;
C_GramWeight.Text := FormatFloat('0.00', (SumJS + SumWS) / ReedWidthValue / 100);
end
else
begin
SumJS := 0;
end;
if Tv2.DataController.Summary.FooterSummaryValues[0] <> null then
begin
SumWS := Tv2.DataController.Summary.FooterSummaryValues[0];
end
else
begin
SumWS := 0;
end;
C_GramWeight.text := floattostr(roundfloat((SumJS + SumWS) / 3, 2));
C_GramWeight.Text := '0.00';
end;
procedure TfrmTatGYInPut.cxGridDBColumn4PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);

View File

@ -1,7 +1,7 @@
inherited frmTatGYList: TfrmTatGYList
Left = 249
Top = 194
Caption = #24037#33402#21333
Caption = #26797#32455#24037#33402#31649#29702
ClientHeight = 579
ClientWidth = 1540
Font.Height = -16
@ -167,6 +167,7 @@ inherited frmTatGYList: TfrmTatGYList
Color = clWhite
ParentBackground = False
TabOrder = 6
ExplicitTop = 24
object Label1: TLabel
Left = 18
Top = 14
@ -300,6 +301,7 @@ inherited frmTatGYList: TfrmTatGYList
Height = 439
Align = alClient
TabOrder = 2
ExplicitLeft = -6
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -587,7 +589,7 @@ inherited frmTatGYList: TfrmTatGYList
TabOrder = 3
Properties.CustomButtons.Buttons = <>
Properties.Style = 9
Properties.TabIndex = 0
Properties.TabIndex = 1
Properties.Tabs.Strings = (
#26410#23457#26680
#24050#23457#26680

View File

@ -141,6 +141,7 @@ type
{ Private declarations }
public
canshu1, FCheJian: string;
fStatus : Integer; //0新增, 1修改
{ Public declarations }
end;
@ -322,7 +323,8 @@ begin
frmTatGYInPut := TfrmTatGYInPut.Create(Application);
with frmTatGYInPut do
begin
PState := 1;
//PState := 1;
fStatus := 1;
FMainId := Trim(Self.CDS_1.fieldbyname('MainId').AsString);
FSubId := Trim(Self.CDS_1.fieldbyname('SubId').AsString);
if ShowModal = 1 then
@ -486,7 +488,7 @@ begin
frmTatGYInPut := TfrmTatGYInPut.Create(Application);
with frmTatGYInPut do
begin
PState := 0;
FStatus := 0;
FMainId := '';
FSubId := '';
if ShowModal = 1 then

View File

@ -243,7 +243,6 @@ inherited frmTatPlanCard1: TfrmTatPlanCard1
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 2
ExplicitTop = 147
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -13,7 +13,23 @@ uses
BtnEdit, RM_BarCode, cxPC, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
dxDateRanges, dxBarBuiltInMenu, U_BaseList, Vcl.Menus, dxScrollbarAnnotations,
cxContainer, dxCore, cxDateUtils, cxMaskEdit, cxDropDownEdit, dxSkinsCore,
dxSkinsDefaultPainters, cxProgressBar;
dxSkinsDefaultPainters, cxProgressBar, dxSkinBasic, dxSkinBlack, dxSkinBlue,
dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatPlanCard1 = class(TfrmBaseList)

View File

@ -336,7 +336,7 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
Tag = 2
Left = 963
Top = 149
Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged
Properties.OnChange = OrdPieceLenPropertiesChange
TabOrder = 2
OnKeyPress = ConNoKeyPress
Width = 150
@ -344,8 +344,8 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object OrdPiece: TcxTextEdit
Tag = 2
Left = 409
Top = 149
Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged
Top = 152
Properties.OnChange = OrdPiecePropertiesChange
TabOrder = 3
OnKeyPress = ConNoKeyPress
Width = 150
@ -354,6 +354,7 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
Tag = 2
Left = 688
Top = 149
Properties.OnChange = OrdQtyPropertiesChange
TabOrder = 1
OnKeyPress = ConNoKeyPress
Width = 150
@ -666,7 +667,7 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object GYNo: TcxButtonEdit
Tag = 2
Left = 117
Top = 149
Top = 144
Properties.Buttons = <
item
Default = True
@ -696,9 +697,6 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object cxTabSheet1: TcxTabSheet
Caption = #32463#19997#32452#21512
ImageIndex = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object GroupBox1: TGroupBox
Left = 931
Top = 0
@ -888,6 +886,7 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
DataBinding.FieldName = 'SH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 79
end
object TV1Column13: TcxGridDBColumn
Caption = #30424#22836#21495
@ -1024,6 +1023,8 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
Height = 343
Align = alClient
TabOrder = 1
ExplicitLeft = 10
ExplicitTop = 9
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -1212,13 +1213,10 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object cxTabSheet3: TcxTabSheet
Caption = #36215#32508#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object cxGrid4: TcxGrid
Left = 0
Top = 361
Width = 1595
Top = 303
Width = 1540
Height = 42
Align = alBottom
TabOrder = 0
@ -1305,8 +1303,8 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
Tag = 2
Left = 0
Top = 0
Width = 1595
Height = 361
Width = 1540
Height = 303
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -1321,15 +1319,12 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object cxTabSheet4: TcxTabSheet
Caption = #31359#32508#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object CZF: TMemo
Tag = 2
Left = 0
Top = 0
Width = 1595
Height = 403
Width = 1540
Height = 345
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
@ -1344,15 +1339,12 @@ inherited frmTatPlanInPut: TfrmTatPlanInPut
object cxTabSheet5: TcxTabSheet
Caption = #31359#31576#27861
ImageIndex = 3
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object CKF: TMemo
Tag = 2
Left = 0
Top = 0
Width = 1595
Height = 403
Width = 1540
Height = 345
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText

View File

@ -197,8 +197,8 @@ type
procedure TBSaveClick(Sender: TObject);
procedure cxGridDBColumn1PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure v2Column11PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure OrdPieceLenChange(Sender: TObject);
procedure OrdPieceChange(Sender: TObject);
//procedure OrdPieceLenChange(Sender: TObject);
//procedure OrdPieceChange(Sender: TObject);
procedure C_CodeKeyPress(Sender: TObject; var Key: Char);
procedure ConNoKeyPress(Sender: TObject; var Key: Char);
procedure MCTypeBtnUpClick(Sender: TObject);
@ -214,7 +214,7 @@ type
procedure C_CodePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure ConNoPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure ToolButton8Click(Sender: TObject);
procedure OrdPiecePropertiesEditValueChanged(Sender: TObject);
//procedure OrdPiecePropertiesEditValueChanged(Sender: TObject);
procedure cxGridDBColumn3PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure v2Column10PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure TV1Column1PropertiesEditValueChanged(Sender: TObject);
@ -222,14 +222,16 @@ type
procedure C_YarnQtyPropertiesEditValueChanged(Sender: TObject);
procedure WB_CodePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure cxButtonEdit1PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure TV1CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure Tv2CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TV1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
procedure Tv2CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
procedure OrdPiecePropertiesChange(Sender: TObject);
procedure OrdQtyPropertiesChange(Sender: TObject);
procedure OrdPieceLenPropertiesChange(Sender: TObject);
procedure UpdateCalculations(Sender: TObject);
private
FXS, FGridFlag: Integer;
FUpdating: Boolean;
FLastChanged: TObject;
procedure InitData();
procedure Initexcel();
procedure CALCYarnQty();
@ -242,6 +244,7 @@ type
public
PState, FCopyInt: Integer;
FConNo, FMainId, FSubId: string;
fStatus : Integer; //0新增, 1修改
{ Public declarations }
end;
@ -556,6 +559,7 @@ procedure TfrmTatPlanInPut.FormCreate(Sender: TObject);
var
FDate: TDateTime;
begin
FUpdating := False;
FDate := SGetServerDateTime(ADOQueryTemp);
OrdDate.Date := FDate;
DlyDate.Date := FDate;
@ -713,7 +717,7 @@ begin
FieldByName('MainId').Value := Trim(maxno);
FieldByName('SubId').Value := Trim(maxsubno);
FieldByName('YRId').Value := Trim(maxpbno);
RTSetSaveDataCDS(ADOQueryCmd, Tv2, CDS_1, 'Tat_Plan_Yarn', 0);
RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_1, 'Tat_Plan_Yarn', 0);
Post;
end;
CDS_1.Edit;
@ -916,7 +920,18 @@ begin
Application.MessageBox('匹数非法数字!', '提示', 0);
Exit;
end;
// with ADOQueryTemp do
// begin
// close;
// SQL.Clear;
// sql.Add('select * from Tat_Plan_Sub where C_Code = ' + QuotedStr(C_Code.Text));
// Open;
// end;
// if (ADOQueryTemp.RecordCount <> 0) and (FStatus = 0) then
// begin
// Application.MessageBox('坯布编号重复!', '提示', 0);
// Exit;
// end;
if SaveData() then
begin
Application.MessageBox('保存成功!', '提示', 0);
@ -986,9 +1001,7 @@ begin
CDS_QZ.EnableControls;
end;
procedure TfrmTatPlanInPut.TV1CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TfrmTatPlanInPut.TV1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
var
AColumn: TcxGridColumn;
AFieldName: string;
@ -1015,6 +1028,7 @@ begin
end;
end;
end;
procedure TfrmTatPlanInPut.TV1Column1PropertiesEditValueChanged(Sender: TObject);
var
mvalue, FFieldName: string;
@ -1077,9 +1091,7 @@ begin
JSKZ();
end;
procedure TfrmTatPlanInPut.Tv2CellClick(Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
procedure TfrmTatPlanInPut.Tv2CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
var
AColumn: TcxGridColumn;
AFieldName: string;
@ -1467,31 +1479,80 @@ begin
end;
end;
//procedure TfrmTatPlanInPut.JSKZ();
//var
// SumJS, SumWS: double;
//begin
// C_GramWeight.SetFocus;
//
// if Tv1.DataController.Summary.FooterSummaryValues[0] <> null then
// begin
// SumJS := Tv1.DataController.Summary.FooterSummaryValues[0];
// end
// else
// begin
// SumJS := 0;
// end;
//
// if Tv2.DataController.Summary.FooterSummaryValues[0] <> null then
// begin
// SumWS := Tv2.DataController.Summary.FooterSummaryValues[0];
// end
// else
// begin
// SumWS := 0;
// end;
//
// C_GramWeight.text := floattostr(roundfloat((SumJS + SumWS) / 3, 2));
//end;
//procedure TfrmTatPlanInPut.JSKZ();
//var
// SumJS, SumWS, ReedWidthValue: Double;
// ErrCode: Integer;
//begin
// C_GramWeight.SetFocus;
// SumJS := IfThen(VarIsNull(Tv1.DataController.Summary.FooterSummaryValues[0]),
// 0,
// Tv1.DataController.Summary.FooterSummaryValues[0]);
//
// SumWS := IfThen(VarIsNull(Tv2.DataController.Summary.FooterSummaryValues[0]),
// 0,
// Tv2.DataController.Summary.FooterSummaryValues[0]);
// Val(Trim(C_ReedWidth.Text), ReedWidthValue, ErrCode);
// if (ErrCode = 0) and (ReedWidthValue > 0) then
// C_GramWeight.Text := FormatFloat('0.00', (SumJS + SumWS) / ReedWidthValue)
// else
// C_GramWeight.Text := '0.00';
//end;
procedure TfrmTatPlanInPut.JSKZ();
var
SumJS, SumWS: double;
SumJS, SumWS, ReedWidthValue: Double;
ErrCode: Integer;
IsInch: Boolean;
begin
C_GramWeight.SetFocus;
if Tv1.DataController.Summary.FooterSummaryValues[0] <> null then
SumJS := IfThen(VarIsNull(Tv1.DataController.Summary.FooterSummaryValues[0]),
0,
Tv1.DataController.Summary.FooterSummaryValues[0]);
SumWS := IfThen(VarIsNull(Tv2.DataController.Summary.FooterSummaryValues[0]),
0,
Tv2.DataController.Summary.FooterSummaryValues[0]);
IsInch := ContainsText(C_ReedWidth.Text, '"');
Val(Trim(StringReplace(C_ReedWidth.Text, '"', '', [rfReplaceAll, rfIgnoreCase])),
ReedWidthValue,
ErrCode);
if (ErrCode = 0) and (ReedWidthValue > 0) then
begin
SumJS := Tv1.DataController.Summary.FooterSummaryValues[0];
if IsInch then
ReedWidthValue := ReedWidthValue * 0.0254;
C_GramWeight.Text := FormatFloat('0.00', (SumJS + SumWS) / ReedWidthValue/100);
end
else
begin
SumJS := 0;
end;
if Tv2.DataController.Summary.FooterSummaryValues[0] <> null then
begin
SumWS := Tv2.DataController.Summary.FooterSummaryValues[0];
end
else
begin
SumWS := 0;
end;
C_GramWeight.text := floattostr(roundfloat((SumJS + SumWS) / 3, 2));
C_GramWeight.Text := '0.00';
end;
procedure TfrmTatPlanInPut.cxGridDBColumn4PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
@ -1642,19 +1703,83 @@ begin
end;
end;
procedure TfrmTatPlanInPut.OrdPieceLenChange(Sender: TObject);
//procedure TfrmTatPlanInPut.OrdPieceLenChange(Sender: TObject);
//var
// FOrdQty, FOrdPieceLen: Double;
//begin
// FOrdQty := StrToFloatDef(OrdQty.Text, 0);
// FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
// if FOrdPieceLen > 0 then
// OrdPiece.Text := IntToStr(Ceil(FOrdQty / FOrdPieceLen));
//end;
//
//procedure TfrmTatPlanInPut.OrdPieceChange(Sender: TObject);
//var
// FOrdQty, FOrdPieceLen, FOrdPiece: Double;
//begin
// FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
// FOrdPiece := StrToFloatDef(OrdPiece.Text, 0);
// if FOrdPiece > 0 then
// OrdQty.Text := FloatToStr(FOrdPieceLen * FOrdPiece)
// else
// OrdQty.Text := '0';
//end;
//
//procedure TfrmTatPlanInPut.OrdPiecePropertiesEditValueChanged(Sender: TObject);
//begin
// OrdQty.text := floattostr(strtofloatdef(OrdPiece.text, 0) * strtofloatdef(OrdPieceLen.text, 0));
//end;
procedure TfrmTatPlanInPut.UpdateCalculations(Sender: TObject);
var
FOrdQty, FOrdPieceLen: Double;
dQty, dPiece, dPieceLen: Double;
begin
FOrdQty := StrToFloatDef(OrdQty.Text, 0);
FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
if FOrdPieceLen > 0 then
OrdPiece.Text := IntToStr(Ceil(FOrdQty / FOrdPieceLen));
if FUpdating then Exit;
FUpdating := True;
try
FLastChanged := Sender;
dQty := StrToFloatDef(OrdQty.Text, 0);
dPiece := StrToFloatDef(OrdPiece.Text, 0);
dPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
if Sender = OrdQty then
begin
if dPiece > 0 then
OrdPieceLen.Text := FormatFloat('0.##', dQty / dPiece)
else if dPieceLen > 0 then
OrdPiece.Text := FormatFloat('0.##', dQty / dPieceLen);
end
else if Sender = OrdPiece then
begin
if dPieceLen > 0 then
OrdQty.Text := FormatFloat('0.##', dPiece * dPieceLen)
else if dQty > 0 then
OrdPieceLen.Text := FormatFloat('0.##', dQty / dPiece);
end
else if Sender = OrdPieceLen then
begin
if dPiece > 0 then
OrdQty.Text := FormatFloat('0.##', dPiece * dPieceLen)
else if dQty > 0 then
OrdPiece.Text := FormatFloat('0.##', dQty / dPieceLen);
end;
finally
FUpdating := False;
end;
end;
procedure TfrmTatPlanInPut.OrdPiecePropertiesEditValueChanged(Sender: TObject);
procedure TfrmTatPlanInPut.OrdPieceLenPropertiesChange(Sender: TObject); //pi chang
begin
OrdQty.text := floattostr(strtofloatdef(OrdPiece.text, 0) * strtofloatdef(OrdPieceLen.text, 0));
UpdateCalculations(Sender);
end;
procedure TfrmTatPlanInPut.OrdPiecePropertiesChange(Sender: TObject); //pi shu
begin
UpdateCalculations(Sender);
end;
procedure TfrmTatPlanInPut.OrdQtyPropertiesChange(Sender: TObject); //zong shu liang
begin
UpdateCalculations(Sender);
end;
procedure TfrmTatPlanInPut.OurCoNameDblClick(Sender: TObject);
@ -1683,18 +1808,6 @@ begin
end;
end;
procedure TfrmTatPlanInPut.OrdPieceChange(Sender: TObject);
var
FOrdQty, FOrdPieceLen, FOrdPiece: Double;
begin
FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
FOrdPiece := StrToFloatDef(OrdPiece.Text, 0);
if FOrdPiece > 0 then
OrdQty.Text := FloatToStr(FOrdPieceLen * FOrdPiece)
else
OrdQty.Text := '0';
end;
procedure TfrmTatPlanInPut.C_CodeKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then

View File

@ -618,6 +618,8 @@ inherited frmTatPlanList: TfrmTatPlanList
#24050#32467#26463
#20840#37096)
OnChange = cxTabControl1Change
ExplicitLeft = 32
ExplicitTop = 106
ClientRectRight = 0
ClientRectTop = 0
end

View File

@ -144,6 +144,7 @@ type
{ Private declarations }
public
canshu1, FCheJian: string;
fStatus : Integer; //0新增, 1修改
{ Public declarations }
end;
@ -226,6 +227,7 @@ begin
end;
procedure TfrmTatPlanList.TBCloseClick(Sender: TObject);
begin
Close;
@ -331,7 +333,7 @@ begin
frmTatPlanInPut := TfrmTatPlanInPut.Create(Application);
with frmTatPlanInPut do
begin
PState := 1;
fStatus := 1;
FMainId := Trim(Self.CDS_1.fieldbyname('MainId').AsString);
FSubId := Trim(Self.CDS_1.fieldbyname('SubId').AsString);
if ShowModal = 1 then
@ -495,9 +497,10 @@ begin
frmTatPlanInPut := TfrmTatPlanInPut.Create(Application);
with frmTatPlanInPut do
begin
PState := 0;
//PState := 0;
FMainId := '';
FSubId := '';
fStatus := 0;
if ShowModal = 1 then
begin
InitGrid();

View File

@ -199,6 +199,7 @@ object frmTatPlanMachInput: TfrmTatPlanMachInput
Left = 561
Top = 10
Enabled = False
StyleDisabled.TextColor = clGrayText
TabOrder = 1
Width = 218
end
@ -242,6 +243,7 @@ object frmTatPlanMachInput: TfrmTatPlanMachInput
Left = 127
Top = 90
Enabled = False
StyleDisabled.TextColor = clGray
TabOrder = 5
Width = 223
end
@ -250,6 +252,7 @@ object frmTatPlanMachInput: TfrmTatPlanMachInput
Left = 561
Top = 51
Enabled = False
StyleDisabled.TextColor = clGray
TabOrder = 6
Width = 218
end
@ -404,6 +407,8 @@ object frmTatPlanMachInput: TfrmTatPlanMachInput
Left = 561
Top = 126
ParentColor = True
Properties.ReadOnly = True
StyleDisabled.TextColor = clGray
TabOrder = 12
Width = 218
end
@ -438,8 +443,9 @@ object frmTatPlanMachInput: TfrmTatPlanMachInput
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
Properties.ReadOnly = True
Properties.OnButtonClick = WB_CodePropertiesButtonClick
StyleDisabled.TextColor = clGray
TabOrder = 15
Width = 223
end

View File

@ -10,7 +10,23 @@ uses
cxGrid, ComCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, cxTextEdit,
cxButtonEdit, StdCtrls, ExtCtrls, cxCurrencyEdit, BtnEdit, cxLookAndFeels,
cxLookAndFeelPainters, cxNavigator, cxContainer, cxMaskEdit, dxDateRanges,
dxScrollbarAnnotations, cxDropDownEdit, dxSkinsCore, dxSkinsDefaultPainters;
dxScrollbarAnnotations, cxDropDownEdit, dxSkinsCore, dxSkinsDefaultPainters,
dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel,
dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast,
dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky,
dxSkinMcSkin, dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinOffice2016Colorful,
dxSkinOffice2016Dark, dxSkinOffice2019Black, dxSkinOffice2019Colorful,
dxSkinOffice2019DarkGray, dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven,
dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, dxSkinSilver,
dxSkinSpringtime, dxSkinStardust, dxSkinSummer2008, dxSkinTheAsphaltWorld,
dxSkinTheBezier, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue;
type
TfrmTatPlanMachInput = class(TForm)
@ -365,7 +381,8 @@ begin
Self.C_Code.Text := frmTatPlanSel.CDS_1.fieldbyname('C_Code').AsString;
Self.C_Name.Text := frmTatPlanSel.CDS_1.fieldbyname('C_Name').AsString;
Self.C_FinishLatitudeDensity.Text := frmTatPlanSel.CDS_1.fieldbyname('C_FinishLatitudeDensity').AsString;
Self.WB_Code.Text := frmTatPlanSel.CDS_1.fieldbyname('WB_Code').AsString;
Self.WB_Name.Text := frmTatPlanSel.CDS_1.fieldbyname('WB_Name').AsString;
with ADOQueryTemp do
begin
Close;
@ -373,8 +390,8 @@ begin
sql.Add('select WB_Code,WB_Name from Bs_Cloth_Info where C_Code =''' + Trim(Self.C_Code.Text) + '''');
Open;
end;
Self.WB_Code.Text := ADOQueryTemp.fieldbyname('WB_Code').AsString;
Self.WB_Name.Text := ADOQueryTemp.fieldbyname('WB_Name').AsString;
// Self.WB_Code.Text := ADOQueryTemp.fieldbyname('WB_Code').AsString;
// Self.WB_Name.Text := ADOQueryTemp.fieldbyname('WB_Name').AsString;
end;
end;

View File

@ -207,8 +207,6 @@ inherited frmTatPlanMachList: TfrmTatPlanMachList
Align = alClient
PopupMenu = PM_1
TabOrder = 2
ExplicitLeft = -5
ExplicitTop = 139
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -361,7 +359,29 @@ inherited frmTatPlanMachList: TfrmTatPlanMachList
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
Width = 82
end
object Tv1Column12: TcxGridDBColumn
Caption = #19978#36724#26102#38388
DataBinding.FieldName = 'SZSJ'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv1Column13: TcxGridDBColumn
Caption = #36724#21345#21495
DataBinding.FieldName = 'ZKH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 88
end
object Tv1Column14: TcxGridDBColumn
Caption = #32463#36724#31859#25968
DataBinding.FieldName = 'JZMS'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
end
end
object cxGrid1Level1: TcxGridLevel
@ -410,8 +430,6 @@ inherited frmTatPlanMachList: TfrmTatPlanMachList
Align = alTop
TabOrder = 0
Visible = False
ExplicitLeft = 6
ExplicitTop = -5
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -14,7 +14,23 @@ uses
cxLookAndFeelPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu, U_BaseList,
dxScrollbarAnnotations, dxCore, cxDateUtils, cxMaskEdit, cxCalendar,
dxSkinsCore, dxSkinsDefaultPainters, cxProgressBar, cxImage, cxDBEdit, IdFTP,
ShellAPI;
ShellAPI, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatPlanMachList = class(TfrmBaseList)
@ -90,6 +106,9 @@ type
Tv1Column9: TcxGridDBColumn;
Tv1Column10: TcxGridDBColumn;
Tv1Column11: TcxGridDBColumn;
Tv1Column12: TcxGridDBColumn;
Tv1Column13: TcxGridDBColumn;
Tv1Column14: TcxGridDBColumn;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormDestroy(Sender: TObject);
procedure P_CodeNameChange(Sender: TObject);

View File

@ -6,7 +6,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
ExplicitWidth = 1489
ExplicitHeight = 621
PixelsPerInch = 96
TextHeight = 12
TextHeight = 17
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
@ -29,7 +29,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
TabOrder = 4
object TBRafresh: TToolButton
Left = 0
Top = 0
@ -105,54 +105,54 @@ inherited frmTatOutputList1: TfrmTatOutputList1
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
TabOrder = 5
object Label3: TLabel
Left = 448
Top = 13
Width = 24
Height = 12
Height = 17
Caption = #21345#21495
end
object Label1: TLabel
Left = 24
Top = 13
Width = 48
Height = 12
Height = 17
Caption = #21047#21345#26085#26399
end
object Label2: TLabel
Left = 246
Top = 13
Width = 12
Height = 12
Height = 17
Caption = #33267
end
object Label13: TLabel
Left = 288
Top = 128
Width = 24
Height = 12
Height = 17
Caption = #23458#25143
end
object Label17: TLabel
Left = 440
Top = 128
Width = 36
Height = 12
Height = 17
Caption = #19994#21153#21592
end
object Label7: TLabel
Left = 604
Top = 124
Width = 36
Height = 12
Height = 17
Caption = #33457#22411#21495
end
object Label4: TLabel
Left = 624
Top = 13
Width = 24
Height = 12
Height = 17
Caption = #24037#24207
end
object pcid: TEdit
@ -160,7 +160,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
Left = 478
Top = 9
Width = 80
Height = 20
Height = 25
TabOrder = 0
OnChange = pcidChange
end
@ -187,7 +187,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
Left = 314
Top = 124
Width = 100
Height = 20
Height = 25
TabOrder = 3
OnChange = pcidChange
end
@ -196,7 +196,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
Left = 478
Top = 124
Width = 100
Height = 20
Height = 25
TabOrder = 4
OnChange = pcidChange
end
@ -205,7 +205,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
Left = 642
Top = 120
Width = 80
Height = 20
Height = 25
TabOrder = 5
OnChange = pcidChange
end
@ -236,7 +236,7 @@ inherited frmTatOutputList1: TfrmTatOutputList1
Left = 654
Top = 9
Width = 80
Height = 20
Height = 25
TabOrder = 8
OnChange = pcidChange
end

View File

@ -12,7 +12,23 @@ uses
cxDropDownEdit, MovePanel, cxButtonEdit, cxCalendar, RM_System, RM_Common,
RM_Class, RM_GridReport, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
dxDateRanges, dxBarBuiltInMenu, U_BaseList, cxCheckBox, Vcl.Menus,
dxScrollbarAnnotations;
dxScrollbarAnnotations, cxContainer, dxSkinsCore, dxSkinBasic, dxSkinBlack,
dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom,
dxSkinDarkSide, dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier,
dxSkinsDefaultPainters, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue, cxProgressBar;
type
TfrmTatOutputList1 = class(TfrmBaseList)

View File

@ -34,6 +34,8 @@ inherited frmTatWBCardInPut: TfrmTatWBCardInPut
Height = 518
Align = alClient
TabOrder = 0
ExplicitLeft = -284
ExplicitTop = 242
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -702,7 +704,6 @@ inherited frmTatWBCardInPut: TfrmTatWBCardInPut
Color = clWhite
ParentBackground = False
TabOrder = 1
ExplicitLeft = -4
object Label15: TLabel
Left = 277
Top = 18
@ -852,8 +853,8 @@ inherited frmTatWBCardInPut: TfrmTatWBCardInPut
Left = 379
Top = 12
Properties.Items.Strings = (
#27974#36724
#32463#36724)
#22823#36135
#35797#26679)
TabOrder = 1
Width = 150
end

View File

@ -260,7 +260,11 @@ begin
end;
WBCNO.Text := FWBCNO;
end;
if Trim(WB_ProcessType.Text) = '本厂整经' then
begin
if Trim(WB_Macher.Text) = '' then
raise Exception.Create('扦经工位不能为空!');
end;
if trim(WB_Code.Text) = '' then
raise Exception.Create('经编号不能为空!');
// if StrToIntDef(edtCardQty.Text, 0) = 0 then
@ -278,12 +282,11 @@ begin
// raise Exception.Create('轴长不能为空!');
// if StrToIntDef(WB_YarnLen.Text, 0) = 0 then
// raise Exception.Create('整经长度不能为空!');
if Trim(WB_Macher.Text) = '' then
raise Exception.Create('扦经工位不能为空!');
if Trim(WB_MachNo.Text) = '' then
if Trim(WB_ProcessType.Text) = '本厂整经' then
begin
if Trim(WB_MachNo.Text) = '' then
raise Exception.Create('迁经机不能为空!');
end;
if Trim(WB_YarnDensity.Text) = '' then
raise Exception.Create('经密不能为空!');

View File

@ -16,7 +16,7 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 88
ButtonWidth = 89
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_WarpBeamStk.cxImageList_bar
@ -106,7 +106,7 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
OnClick = TBExportClick
end
object ToolButton1: TToolButton
Left = 668
Left = 669
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
@ -114,7 +114,7 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 755
Left = 756
Top = 0
AutoSize = True
Caption = #20851#38381
@ -132,7 +132,7 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
TabOrder = 8
object Label3: TLabel
Left = 56
Top = 46
@ -161,10 +161,10 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
ExplicitTop = 2
ExplicitWidth = 1469
inherited cbbType: TcxComboBox
ExplicitHeight = 29
ExplicitHeight = 33
end
inherited EndTime: TcxTimeEdit
ExplicitHeight = 29
ExplicitHeight = 33
end
end
object pcid: TcxTextEdit
@ -716,7 +716,7 @@ inherited frmTatWBOutputList_CZ: TfrmTatWBOutputList_CZ
Top = 241
ExplicitLeft = 252
ExplicitTop = 241
ExplicitHeight = 28
ExplicitHeight = 29
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink

View File

@ -14,7 +14,23 @@ uses
dxDateRanges, dxBarBuiltInMenu, U_BaseList, cxCheckBox, Vcl.Menus,
dxScrollbarAnnotations, FrameDateTimeSel, cxContainer, cxTextEdit, U_SLTGDTP,
cxMemo, Vcl.Imaging.jpeg, cxPC, dxSkinsCore, dxSkinsDefaultPainters,
cxProgressBar;
cxProgressBar, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatWBOutputList_CZ = class(TfrmBaseList)

View File

@ -18,14 +18,13 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 107
ButtonWidth = 131
Caption = 'ToolBar1'
DisabledImages = DataLink_WarpBeamStk.cxImageList_bar
Images = DataLink_WarpBeamStk.cxImageList_bar
List = True
ShowCaptions = True
TabOrder = 6
ExplicitWidth = 1376
object TBRafresh: TToolButton
Left = 0
Top = 0
@ -35,7 +34,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = TBRafreshClick
end
object ToolButton5: TToolButton
Left = 63
Left = 71
Top = 0
AutoSize = True
Caption = #26032#22686
@ -43,7 +42,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton5Click
end
object ToolButton6: TToolButton
Left = 126
Left = 142
Top = 0
AutoSize = True
Caption = #20462#25913
@ -51,7 +50,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton6Click
end
object ToolButton3: TToolButton
Left = 189
Left = 213
Top = 0
AutoSize = True
Caption = #36724#21345#21024#38500
@ -59,7 +58,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton3Click
end
object ToolButton4: TToolButton
Left = 276
Left = 316
Top = 0
AutoSize = True
Caption = #25972#32463#35745#21010#25171#21360
@ -67,7 +66,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton4Click
end
object ToolButton1: TToolButton
Left = 387
Left = 451
Top = 0
AutoSize = True
Caption = #36724#21345#25171#21360
@ -75,7 +74,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 474
Left = 554
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
@ -83,7 +82,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 561
Left = 657
Top = 0
AutoSize = True
Caption = #20851#38381
@ -102,7 +101,6 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
ParentBackground = False
ParentColor = True
TabOrder = 7
ExplicitWidth = 1376
object Label1: TLabel
Left = 15
Top = 45
@ -170,7 +168,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
TabOrder = 3
ExplicitLeft = 2
ExplicitTop = 2
ExplicitWidth = 1372
ExplicitWidth = 1378
ExplicitHeight = 37
inherited lbl2: TLabel
Width = 16
@ -404,7 +402,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Align = alRight
Caption = 'Panel2'
TabOrder = 3
ExplicitLeft = 984
Visible = False
object cxGrid2: TcxGrid
Left = 1
Top = 112
@ -412,6 +410,7 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Height = 281
Align = alClient
TabOrder = 0
Visible = False
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -608,7 +607,6 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 4
ExplicitWidth = 247
object Tv4: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -754,14 +752,6 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Options.Editing = False
Width = 105
end
object cxGridDBColumn35: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 146
end
object Tv4Column3: TcxGridDBColumn
Caption = #21152#24037#31867#22411
DataBinding.Expression = #1'jgType'
@ -770,6 +760,14 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Options.Editing = False
Width = 100
end
object cxGridDBColumn35: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 146
end
end
object cxGridLevel4: TcxGridLevel
GridView = Tv4
@ -784,7 +782,6 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Align = alBottom
TabOrder = 5
Visible = False
ExplicitWidth = 1376
object TabSheet1: TTabSheet
Caption = #25972#32463#25195#25551#35760#24405
object cxGrid3: TcxGrid
@ -794,7 +791,6 @@ inherited frmTatWBPlanCard: TfrmTatWBPlanCard
Height = 157
Align = alClient
TabOrder = 0
ExplicitWidth = 1368
object TV3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -12,7 +12,23 @@ uses
StrUtils, cxPC, ShellAPI, cxCalendar, Math, cxLookAndFeels,
cxLookAndFeelPainters, dxBarBuiltInMenu, cxNavigator, dxDateRanges,
U_BaseInput, System.ImageList, Vcl.ImgList, Vcl.Menus, dxScrollbarAnnotations,
cxImageList;
cxImageList, dxSkinsCore, dxSkinBasic, dxSkinBlack, dxSkinBlue,
dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier,
dxSkinsDefaultPainters, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue;
type
TfrmTatWBPlanInPut = class(TfrmBaseInput)

View File

@ -18,7 +18,7 @@ inherited frmWBSpecInPut: TfrmWBSpecInPut
Height = 408
Align = alClient
TabOrder = 0
ExplicitHeight = 300
ExplicitTop = 461
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -107,10 +107,9 @@ inherited frmWBSpecInPut: TfrmWBSpecInPut
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.ReadOnly = False
Properties.OnButtonClick = Tv1Column2PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 101
end
object v1SPSpec: TcxGridDBColumn
@ -263,6 +262,7 @@ inherited frmWBSpecInPut: TfrmWBSpecInPut
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
ExplicitTop = 36
object Label7: TLabel
Left = 75
Top = 342

View File

@ -151,6 +151,8 @@ inherited frmWBSpecList: TfrmWBSpecList
Height = 480
Align = alClient
TabOrder = 2
ExplicitLeft = 8
ExplicitTop = 75
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -108,7 +108,7 @@ inherited frmWarpBeamInfoList: TfrmWarpBeamInfoList
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
TabOrder = 4
object Label4: TLabel
Left = 41
Top = 9
@ -214,7 +214,7 @@ inherited frmWarpBeamInfoList: TfrmWarpBeamInfoList
end
end
inherited cxProgressBar2: TcxProgressBar
ExplicitHeight = 28
ExplicitHeight = 29
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink

View File

@ -13,7 +13,23 @@ uses
RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu,
dxDateRanges, U_BaseList, dxScrollbarAnnotations, cxContainer, dxSkinsCore,
dxSkinsDefaultPainters, cxProgressBar;
dxSkinsDefaultPainters, cxProgressBar, dxSkinBasic, dxSkinBlack, dxSkinBlue,
dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmWarpBeamInfoList = class(TfrmBaseList)

View File

@ -131,8 +131,8 @@
<Transaction>1899/12/30 00:00:00.000.512,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.584,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_CZ.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.922,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.444,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_WBSpecInPut.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.922,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.158,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.535,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.dfm</Transaction>

View File

@ -44,7 +44,8 @@ uses
FrameDateSel in '..\A00通用组件\FrameDateSel.pas' {frmFrameDateSel: TFrame},
U_TatClothInList_ZDDY in 'U_TatClothInList_ZDDY.pas' {frmTatClothInList_ZDDY},
uSZHN_JSON in '..\..\..\public10\ThreeFun\Fun\uSZHN_JSON.pas',
U_TradeSalesContractSel in '..\T00贸易通用窗体\U_TradeSalesContractSel.pas' {frmTradeSalesContractSel};
U_TradeSalesContractSel in '..\T00贸易通用窗体\U_TradeSalesContractSel.pas' {frmTradeSalesContractSel},
U_TatClothStkList in 'U_TatClothStkList.pas' {frmTatClothStkList};
{$R *.res}

View File

@ -4,7 +4,7 @@
<MainSource>TatClothStk.dpr</MainSource>
<Base>True</Base>
<Config Condition="'$(Config)'==''">Debug</Config>
<TargetedPlatforms>38017</TargetedPlatforms>
<TargetedPlatforms>1</TargetedPlatforms>
<AppType>Library</AppType>
<FrameworkType>VCL</FrameworkType>
<ProjectVersion>19.2</ProjectVersion>
@ -13,16 +13,6 @@
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Android64' and '$(Base)'=='true') or '$(Base_Android64)'!=''">
<Base_Android64>true</Base_Android64>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Base)'=='true') or '$(Base_iOSDevice64)'!=''">
<Base_iOSDevice64>true</Base_iOSDevice64>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
<Base_Win32>true</Base_Win32>
<CfgParent>Base</CfgParent>
@ -43,24 +33,6 @@
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Android64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Android64)'!=''">
<Cfg_2_Android64>true</Cfg_2_Android64>
<CfgParent>Cfg_2</CfgParent>
<Cfg_2>true</Cfg_2>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Cfg_2)'=='true') or '$(Cfg_2_iOSDevice64)'!=''">
<Cfg_2_iOSDevice64>true</Cfg_2_iOSDevice64>
<CfgParent>Cfg_2</CfgParent>
<Cfg_2>true</Cfg_2>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='OSX64' and '$(Cfg_2)'=='true') or '$(Cfg_2_OSX64)'!=''">
<Cfg_2_OSX64>true</Cfg_2_OSX64>
<CfgParent>Cfg_2</CfgParent>
<Cfg_2>true</Cfg_2>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
<Cfg_2_Win32>true</Cfg_2_Win32>
<CfgParent>Cfg_2</CfgParent>
@ -84,13 +56,6 @@
<VerInfo_Locale>2052</VerInfo_Locale>
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_Android64)'!=''">
<Android_LauncherIcon192>$(BDS)\bin\Artwork\Android\FM_LauncherIcon_192x192.png</Android_LauncherIcon192>
<EnabledSysJars>android-support-v4.dex.jar;cloud-messaging.dex.jar;com-google-android-gms.play-services-ads-base.17.2.0.dex.jar;com-google-android-gms.play-services-ads-identifier.16.0.0.dex.jar;com-google-android-gms.play-services-ads-lite.17.2.0.dex.jar;com-google-android-gms.play-services-ads.17.2.0.dex.jar;com-google-android-gms.play-services-analytics-impl.16.0.8.dex.jar;com-google-android-gms.play-services-analytics.16.0.8.dex.jar;com-google-android-gms.play-services-base.16.0.1.dex.jar;com-google-android-gms.play-services-basement.16.2.0.dex.jar;com-google-android-gms.play-services-gass.17.2.0.dex.jar;com-google-android-gms.play-services-identity.16.0.0.dex.jar;com-google-android-gms.play-services-maps.16.1.0.dex.jar;com-google-android-gms.play-services-measurement-base.16.4.0.dex.jar;com-google-android-gms.play-services-measurement-sdk-api.16.4.0.dex.jar;com-google-android-gms.play-services-stats.16.0.1.dex.jar;com-google-android-gms.play-services-tagmanager-v4-impl.16.0.8.dex.jar;com-google-android-gms.play-services-tasks.16.0.1.dex.jar;com-google-android-gms.play-services-wallet.16.0.1.dex.jar;com-google-firebase.firebase-analytics.16.4.0.dex.jar;com-google-firebase.firebase-common.16.1.0.dex.jar;com-google-firebase.firebase-iid-interop.16.0.1.dex.jar;com-google-firebase.firebase-iid.17.1.1.dex.jar;com-google-firebase.firebase-measurement-connector.17.0.1.dex.jar;com-google-firebase.firebase-messaging.17.5.0.dex.jar;fmx.dex.jar;google-play-billing.dex.jar;google-play-licensing.dex.jar</EnabledSysJars>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_iOSDevice64)'!=''">
<iOS_AppStore1024>$(BDS)\bin\Artwork\iOS\iPhone\FM_ApplicationIcon_1024x1024.png</iOS_AppStore1024>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_Win32)'!=''">
<DCC_Namespace>System.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
<BT_BuildType>Debug</BT_BuildType>
@ -113,15 +78,6 @@
<DCC_Optimize>false</DCC_Optimize>
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_Android64)'!=''">
<BT_BuildType>Debug</BT_BuildType>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_iOSDevice64)'!=''">
<BT_BuildType>Debug</BT_BuildType>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_OSX64)'!=''">
<BT_BuildType>Debug</BT_BuildType>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName)</VerInfo_Keys>
<Debugger_HostApplication>D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E04梭织坯布仓库\testDll.exe</Debugger_HostApplication>
@ -228,6 +184,10 @@
<Form>frmTradeSalesContractSel</Form>
<FormType>dfm</FormType>
</DCCReference>
<DCCReference Include="U_TatClothStkList.pas">
<Form>frmTatClothStkList</Form>
<FormType>dfm</FormType>
</DCCReference>
<BuildConfiguration Include="Debug">
<Key>Cfg_2</Key>
<CfgParent>Base</CfgParent>
@ -250,10 +210,6 @@
</Source>
</Delphi.Personality>
<Platforms>
<Platform value="Android64">True</Platform>
<Platform value="iOSDevice64">True</Platform>
<Platform value="Linux64">True</Platform>
<Platform value="OSX64">True</Platform>
<Platform value="Win32">True</Platform>
<Platform value="Win64">False</Platform>
</Platforms>

View File

@ -1,120 +1,93 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>1899-12-30 00:00:00.000.025,D:\Dp10RepoV1\项目代码\花蝴蝶\B03基础物料仓库\U_ProductInfoInPut.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.316,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_TatClothInfoInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.456,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.181,=D:\Dp10Repo\项目代码\路尚\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.618,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessListSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.559,=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList_ZDDY.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.506,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.280,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.376,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRtInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.390,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_ProductInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.338,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_WBSpecSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.500,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.627,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.057,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.680,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.752,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitPlanSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.862,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsinput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.744,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.439,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.669,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.436,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.231,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.695,=D:\Dp10Repo\项目代码\路尚\B03基础物料仓库\U_ProductInfoInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.038,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\Unit1.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.526,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.961,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.754,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInfoInPut.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.541,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj</Transaction>
<Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.326,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.139,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj</Transaction>
<Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.378,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.316,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_TatClothInfoInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.181,=D:\Dp10Repo\项目代码\路尚\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.680,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.559,=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList_ZDDY.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.506,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.456,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.025,D:\Dp10RepoV1\项目代码\花蝴蝶\B03基础物料仓库\U_ProductInfoInPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.057,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.627,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.280,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.376,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRtInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.390,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_ProductInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.500,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.862,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsinput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.338,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_WBSpecSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.752,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitPlanSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.439,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.669,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.526,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.436,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.231,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.695,=D:\Dp10Repo\项目代码\路尚\B03基础物料仓库\U_ProductInfoInPut.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.038,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\Unit1.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.541,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.326,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.744,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.618,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessListSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.961,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.139,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.754,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInfoInPut.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.378,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=</Transaction>
<Transaction>2025/07/03 14:12:23.877,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="android-support-v4.dex.jar"/>
<File Path="cloud-messaging.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-base.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-identifier.16.0.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads-lite.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-ads.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-analytics-impl.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-analytics.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-base.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-basement.16.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-gass.17.2.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-identity.16.0.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-maps.16.1.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-measurement-base.16.4.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-measurement-sdk-api.16.4.0.dex.jar"/>
<File Path="com-google-android-gms.play-services-stats.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-tagmanager-v4-impl.16.0.8.dex.jar"/>
<File Path="com-google-android-gms.play-services-tasks.16.0.1.dex.jar"/>
<File Path="com-google-android-gms.play-services-wallet.16.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-analytics.16.4.0.dex.jar"/>
<File Path="com-google-firebase.firebase-common.16.1.0.dex.jar"/>
<File Path="com-google-firebase.firebase-iid-interop.16.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-iid.17.1.1.dex.jar"/>
<File Path="com-google-firebase.firebase-measurement-connector.17.0.1.dex.jar"/>
<File Path="com-google-firebase.firebase-messaging.17.5.0.dex.jar"/>
<File Path="fmx.dex.jar"/>
<File Path="google-play-billing.dex.jar"/>
<File Path="google-play-licensing.dex.jar"/>
<File Path="..\..\D10szKaiXiYa"/>
<File Path="..\..\D10SZKaiXiYa"/>
<File Path="..\A00通用窗体"/>
<File Path="..\A00通用窗体\U_AttachmentUpload.pas"/>
<File Path="..\A00通用窗体\U_AttachmentUpload.dfm"/>
@ -193,5 +166,7 @@
<File Path="U_TatClothOutList.dfm"/>
<File Path="U_TatDRSel.pas"/>
<File Path="U_TatDRSel.dfm"/>
<File Path="U_TatClothStkList.pas"/>
<File Path="U_TatClothStkList.dfm"/>
</ProjectSortOrder>
</BorlandProject>

View File

@ -22,7 +22,23 @@ uses
dxCore, dxLayoutLookAndFeels, dxSkinsCore, dxSkinsDefaultPainters;
dxCore, dxLayoutLookAndFeels, dxSkinsCore, dxSkinsDefaultPainters,
dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel,
dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast,
dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky,
dxSkinMcSkin, dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinOffice2016Colorful,
dxSkinOffice2016Dark, dxSkinOffice2019Black, dxSkinOffice2019Colorful,
dxSkinOffice2019DarkGray, dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven,
dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, dxSkinSilver,
dxSkinSpringtime, dxSkinStardust, dxSkinSummer2008, dxSkinTheAsphaltWorld,
dxSkinTheBezier, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue;
type
TMyThread = class(TThread)

View File

@ -71,10 +71,10 @@ begin
if trim(DataBaseStr) = '' then
begin
server := '101.132.143.144,7781';
server := '150.109.121.232,7781';
dtbase := 'KaiXiYadata';
user := 'rtsa';
pswd := 'rightsoft@5740';
user := 'kaixiyasa';
pswd := 'rightsoft,.KXY@YN';
DConString := 'Provider=SQLOLEDB.1;Password=' + pswd + ';Persist Security Info=True;User ID=' + user + ';Initial Catalog=' + dtbase + ';Data Source=' + server;
Parameters1 := '¹ÜÀí';
end

View File

@ -82,7 +82,7 @@ inherited frmTatClothStkList: TfrmTatClothStkList
Height = 570
Align = alClient
TabOrder = 3
Properties.ActivePage = cxTabSheet1
Properties.ActivePage = cxTabSheet2
Properties.CustomButtons.Buttons = <>
Properties.Style = 5
OnChange = cxPageControl1Change
@ -280,7 +280,6 @@ inherited frmTatClothStkList: TfrmTatClothStkList
BorderStyle = cxcbsNone
PopupMenu = PM_2
TabOrder = 1
ExplicitTop = 72
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
@ -844,7 +843,6 @@ inherited frmTatClothStkList: TfrmTatClothStkList
BorderStyle = cxcbsNone
PopupMenu = PM_1
TabOrder = 2
ExplicitTop = 133
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>

View File

@ -14,7 +14,23 @@ uses
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, cxTextEdit, dxDateRanges,
dxBarBuiltInMenu, U_BaseList, cxPC, System.StrUtils, cxContainer, dxCore,
cxDateUtils, cxMaskEdit, dxScrollbarAnnotations, cxProgressBar, dxSkinsCore,
dxSkinsDefaultPainters;
dxSkinsDefaultPainters, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatClothStkList = class(TfrmBaseList)

View File

@ -0,0 +1,495 @@
unit U_TatClothStkList;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
RM_System, RM_GridReport, Menus, cxCalendar, MovePanel, Math, Clipbrd,
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, cxTextEdit, dxDateRanges,
dxBarBuiltInMenu, U_BaseList, cxPC, System.StrUtils, cxContainer, dxCore,
cxDateUtils, cxMaskEdit, dxScrollbarAnnotations, cxProgressBar, dxSkinsCore,
dxSkinsDefaultPainters, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatClothStkList = class(TfrmBaseList)
ToolBar1: TToolBar;
TBRafresh: TToolButton;
TBExport: TToolButton;
TBClose: TToolButton;
ADOQueryCmd: TADOQuery;
ADOQueryMain: TADOQuery;
ADOQueryTemp: TADOQuery;
DS_1: TDataSource;
GPM_1: TcxGridPopupMenu;
CDS_1: TClientDataSet;
ToolButton2: TToolButton;
ToolButton4: TToolButton;
PM_1: TPopupMenu;
PM11: TMenuItem;
N1: TMenuItem;
cxPageControl1: TcxPageControl;
cxTabSheet1: TcxTabSheet;
cxTabSheet2: TcxTabSheet;
Panel6: TPanel;
Label31: TLabel;
LBCPAP: TLabel;
BTLP: TButton;
BTNP: TButton;
TCBNOR: TComboBox;
Pnl_F1: TPanel;
Label3: TLabel;
Label7: TLabel;
Label10: TLabel;
Label5: TLabel;
lbl1: TLabel;
Label20: TLabel;
Label23: TLabel;
begtime: TDateTimePicker;
endTime: TDateTimePicker;
OrderNo: TcxTextEdit;
conNO: TcxTextEdit;
STKID: TcxTextEdit;
C_Name: TcxTextEdit;
C_Color: TcxTextEdit;
BCIOID: TcxTextEdit;
C_Pattern: TcxTextEdit;
C_Code: TcxTextEdit;
Pnl_F2: TPanel;
Label4: TLabel;
Label6: TLabel;
Label9: TLabel;
Label13: TLabel;
DateTimePicker3: TDateTimePicker;
DateTimePicker4: TDateTimePicker;
Edit1: TcxTextEdit;
Edit2: TcxTextEdit;
Edit4: TcxTextEdit;
Edit5: TcxTextEdit;
Edit8: TcxTextEdit;
GPM_2: TcxGridPopupMenu;
CDS_2: TClientDataSet;
DS_2: TDataSource;
cxGrid2: TcxGrid;
TV2: TcxGridDBTableView;
cxGridDBColumn2: TcxGridDBColumn;
cxGridDBColumn3: TcxGridDBColumn;
cxGridDBColumn4: TcxGridDBColumn;
cxGridDBColumn5: TcxGridDBColumn;
cxGridDBColumn7: TcxGridDBColumn;
cxGridDBColumn8: TcxGridDBColumn;
cxGridDBColumn9: TcxGridDBColumn;
cxGridDBColumn10: TcxGridDBColumn;
cxGridDBColumn11: TcxGridDBColumn;
cxGridDBColumn12: TcxGridDBColumn;
cxGridDBColumn13: TcxGridDBColumn;
cxGridDBColumn14: TcxGridDBColumn;
cxGridDBColumn15: TcxGridDBColumn;
cxGridDBColumn16: TcxGridDBColumn;
cxGridDBColumn18: TcxGridDBColumn;
cxGridLevel1: TcxGridLevel;
TV2Column3: TcxGridDBColumn;
Label18: TLabel;
Label19: TLabel;
Edit9: TcxTextEdit;
Edit10: TcxTextEdit;
Label8: TLabel;
Label14: TLabel;
Edit3: TcxTextEdit;
Edit11: TcxTextEdit;
PM_2: TPopupMenu;
MenuItem1: TMenuItem;
N2: TMenuItem;
TV2Column2: TcxGridDBColumn;
cxGrid1: TcxGrid;
Tv1: TcxGridDBTableView;
v1Column22: TcxGridDBColumn;
v1Column21: TcxGridDBColumn;
v1Column32: TcxGridDBColumn;
v1Column1: TcxGridDBColumn;
Tv1Column4: TcxGridDBColumn;
v1Column13: TcxGridDBColumn;
v1Column4: TcxGridDBColumn;
v1Column23: TcxGridDBColumn;
v1Column8: TcxGridDBColumn;
v1Column27: TcxGridDBColumn;
v1Column28: TcxGridDBColumn;
v1Column10: TcxGridDBColumn;
Tv1Column11: TcxGridDBColumn;
Tv1Column10: TcxGridDBColumn;
v1Column12: TcxGridDBColumn;
v1Column42: TcxGridDBColumn;
v1Column6: TcxGridDBColumn;
v1Column3: TcxGridDBColumn;
v1Column5: TcxGridDBColumn;
Tv1Column6: TcxGridDBColumn;
cxGrid1Level1: TcxGridLevel;
Label1: TLabel;
BegDate2: TcxDateEdit;
EndDate2: TcxDateEdit;
chk_F2: TcxCheckBox;
Label2: TLabel;
chk_F1: TcxCheckBox;
BegDate: TcxDateEdit;
EndDate: TcxDateEdit;
TV2Column1: TcxGridDBColumn;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure TBRafreshClick(Sender: TObject);
procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure TBExportClick(Sender: TObject);
procedure orderNoKeyPress(Sender: TObject; var Key: Char);
procedure BTNPClick(Sender: TObject);
procedure BTLPClick(Sender: TObject);
procedure TCBNORChange(Sender: TObject);
procedure JYTypeChange(Sender: TObject);
procedure ToolButton2Click(Sender: TObject);
procedure cxPageControl1Change(Sender: TObject);
procedure CDS_1BeforeOpen(DataSet: TDataSet);
procedure Tv1DataControllerFilterBeforeChange(Sender: TcxDBDataFilterCriteria; ADataSet: TDataSet; const AFilterText: string);
procedure ToolButton4Click(Sender: TObject);
procedure PM11Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure TV2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
procedure MenuItem1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure TV2CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
procedure Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
procedure Tv1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems6GetText(Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean; var AText: string);
private
CurrentPage, RecordsNumber: Integer;
lstPacketId: TStringList;
procedure InitGrid(WSql: string);
procedure InitPage();
procedure SetStatus();
{ Private declarations }
public
canshu1, FWorkshop: string;
{ Public declarations }
end;
implementation
uses
U_DataLink, U_RTFun, U_LabelPrint;
{$R *.dfm}
procedure TfrmTatClothStkList.InitPage();
begin
CurrentPage := 1;
case cxPageControl1.ActivePageIndex of
0:
begin
InitGrid(SGetHintFilters(Pnl_F2, 1, 2));
end;
1:
begin
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
end;
end;
procedure TfrmTatClothStkList.SetStatus();
begin
// if canshu1 then
end;
procedure TfrmTatClothStkList.FormClose(Sender: TObject; var Action: TCloseAction);
begin
inherited;
FreeAndNil(lstPacketId);
Action := caFree;
end;
procedure TfrmTatClothStkList.FormCreate(Sender: TObject);
begin
inherited;
lstPacketId := TStringList.Create;
EndDate.Date := SGetServerDateTime(ADOQueryTemp);
BegDate.Date := EndDate.Date - 20;
BegDate2.Date := BegDate.Date;
EndDate2.Date := EndDate.Date;
FWorkshop := trim(Self.fParameters3);
end;
procedure TfrmTatClothStkList.InitGrid(WSql: string);
begin
if Trim(WSql) <> '' then
WSql := ' and ' + WSql;
case cxPageControl1.ActivePageIndex of
0:
begin
if chk_F2.Checked then
begin
WSql := WSql + ' and IOTime>=' + quotedstr(FormatDateTime('yyyy-MM-dd', BegDate2.Date));
WSql := WSql + ' and IOTime<' + quotedstr(FormatDateTime('yyyy-MM-dd', enddate2.Date + 1));
end;
with ADOQueryMain do
begin
Filtered := False;
Close;
sql.Clear;
sql.Add(' select kl= DATEDIFF(dd,IOTime, GETDATE()), IOTime=CONVERT(VARCHAR(10),IOTime,120),OrderNo,C_Code,C_Name,IOType,Grade,CustName,C_Width,C_GramWeight,BatchNo,C_Color');
sql.Add(' ,COUNT(PieceNo) SumPieceNo,sum(GrossWeight) SumGrossWeight,sum(Tare) SumTare,sum(NetWeight) SumNetWeight');
sql.Add(' ,Sum(Meter) SumMeter,Sum(Yardage) SumYardage');
sql.Add(' from V_Tat_Cloth_Stk A where 1=1 ');
sql.Add(WSql);
sql.Add(' GROUP BY DATEDIFF(dd,IOTime, GETDATE()), CONVERT(VARCHAR(10),IOTime,120),OrderNo,C_Code,C_Name,IOType,Grade,CustName,C_Width,C_GramWeight,BatchNo,C_Color');
// showmessage(sql.text);
Open;
end;
SCreateCDS(ADOQueryMain, CDS_2);
SInitCDSData(ADOQueryMain, CDS_2);
TV2.DataController.Filter.Clear;
end;
1:
begin
if chk_F1.Checked then
begin
WSql := WSql + ' and IOTime>=' + quotedstr(FormatDateTime('yyyy-MM-dd', BegDate.Date));
WSql := WSql + ' and IOTime<' + quotedstr(FormatDateTime('yyyy-MM-dd', enddate.Date + 1));
end;
with ADOQueryMain do
begin
Filtered := False;
Close;
sql.Clear;
sql.Add(' select top ' + inttostr(RecordsNumber) + ' * ');
sql.Add(' from ');
sql.Add('(select rownumber=cast((row_number() over(order by AA.IOTime desc)) as int)');
sql.Add(',COUNT(1) OVER() AS TotalCount');
sql.Add(', kl= DATEDIFF(dd,IOTime, GETDATE()),* from V_Tat_Cloth_Stk AA where 1=1 ');
// if trim(FWorkshop) <> '' then
// sql.Add(' and Workshop=''' + trim(FWorkshop) + ''' ');
sql.Add('and 1=1 ' + WSql);
sql.Add(') temp_row');
sql.Add(' where rownumber> ' + inttostr(((CurrentPage - 1) * RecordsNumber)));
sql.Add(' order by rownumber');
// showmessage(sql.text);
Open;
end;
SCreateCDS(ADOQueryMain, CDS_1);
SInitCDSData(ADOQueryMain, CDS_1);
LBCPAP.Caption := inttostr(CurrentPage) + '/' + inttostr(ceil(CDS_1.FieldByName('TotalCount').AsInteger / RecordsNumber));
TV1.DataController.Filter.Clear;
end;
end;
end;
procedure TfrmTatClothStkList.TBRafreshClick(Sender: TObject);
begin
InitPage();
end;
procedure TfrmTatClothStkList.CDS_1BeforeOpen(DataSet: TDataSet);
begin
lstPacketId.Clear;
end;
procedure TfrmTatClothStkList.cxPageControl1Change(Sender: TObject);
begin
SetStatus();
end;
procedure TfrmTatClothStkList.TBCloseClick(Sender: TObject);
begin
Close;
end;
procedure TfrmTatClothStkList.FormShow(Sender: TObject);
begin
inherited;
ReadCxGrid(trim(self.Caption) + 'Tv1', Tv1, '梭织坯布仓库');
ReadCxGrid(trim(self.Caption) + 'Tv2', Tv2, '梭织坯布仓库');
CurrentPage := 1;
RecordsNumber := 500;
canshu1 := Trim(Self.fParameters1);
SetStatus();
InitPage();
end;
procedure TfrmTatClothStkList.TBExportClick(Sender: TObject);
begin
if ADOQueryMain.IsEmpty then
exit;
TcxGridToExcel(Self.Caption, cxGrid1);
end;
procedure TfrmTatClothStkList.orderNoKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
InitPage();
end;
end;
procedure TfrmTatClothStkList.PM11Click(Sender: TObject);
begin
SelOKNo(CDS_1, false);
end;
procedure TfrmTatClothStkList.Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName('kl').Index] > 90 then
ACanvas.Brush.Color := $B3DEF5;
end;
procedure TfrmTatClothStkList.Tv1DataControllerFilterBeforeChange(Sender: TcxDBDataFilterCriteria; ADataSet: TDataSet; const AFilterText: string);
begin
lstPacketId.Clear; //重新打开数据集前清空lstPacketId
end;
procedure TfrmTatClothStkList.Tv1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems6GetText(Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean; var AText: string);
begin
if lstPacketId <> nil then
AText := IntToStr(lstPacketId.Count);
end;
procedure TfrmTatClothStkList.TV2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
begin
BegDate.Date := BegDate2.Date;
EndDate.Date := EndDate2.Date;
chk_F2.Checked := chk_F1.Checked;
cxPageControl1.ActivePageIndex := 1;
SetStatus();
InitGrid(SGetCDSFilters(Tv2, CDS_2));
end;
procedure TfrmTatClothStkList.TV2CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName('kl').Index] > 90 then
ACanvas.Brush.Color := $B3DEF5;
end;
procedure TfrmTatClothStkList.BTNPClick(Sender: TObject);
begin
if CurrentPage < CDS_1.FieldByName('TotalCount').AsInteger / RecordsNumber then
CurrentPage := CurrentPage + 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.BTLPClick(Sender: TObject);
begin
if CurrentPage > 1 then
CurrentPage := CurrentPage - 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.TCBNORChange(Sender: TObject);
begin
RecordsNumber := StrToInt(TCBNOR.Text);
CurrentPage := 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.JYTypeChange(Sender: TObject);
begin
CurrentPage := 1;
InitPage();
end;
procedure TfrmTatClothStkList.MenuItem1Click(Sender: TObject);
begin
Clipboard.SetTextBuf(PChar(Trim(CDS_2.fieldbyname(TV2.Controller.FocusedColumn.DataBinding.FilterFieldName).AsString)));
end;
procedure TfrmTatClothStkList.N1Click(Sender: TObject);
begin
SelOKNo(CDS_1, true);
end;
procedure TfrmTatClothStkList.N2Click(Sender: TObject);
begin
Clipboard.SetTextBuf(PChar(Trim(CDS_1.fieldbyname(TV1.Controller.FocusedColumn.DataBinding.FilterFieldName).AsString)));
end;
procedure TfrmTatClothStkList.ToolButton2Click(Sender: TObject);
var
WSql: string;
begin
if CDS_1.IsEmpty then
Exit;
if not CDS_1.Locate('SSel', True, []) then
begin
Application.MessageBox('没有选择数据!', '提示', 0);
Exit;
end;
WSql := '';
CDS_1.DisableControls;
with CDS_1 do
begin
First;
while not Eof do
begin
if CDS_1.fieldbyname('SSel').AsBoolean then
begin
if WSql <> '' then
begin
WSql := WSql + ',' + QuotedStr(Trim(CDS_1.fieldbyname('CIID').AsString));
end
else
begin
WSql := QuotedStr(Trim(CDS_1.fieldbyname('CIID').AsString));
end;
end;
Next;
end;
end;
ShowMessage(WSql);
CDS_1.Locate('SSel', True, []);
CDS_1.EnableControls;
try
frmLabelPrint := TfrmLabelPrint.Create(Application);
with frmLabelPrint do
begin
FLMType := 'TatClothStk';
FFiltration1 := WSql;
if ShowModal = 1 then
begin
end;
end;
finally
frmLabelPrint.Free;
end;
end;
procedure TfrmTatClothStkList.ToolButton4Click(Sender: TObject);
begin
WriteCxGrid(trim(self.Caption) + 'Tv1', Tv1, '梭织坯布仓库');
WriteCxGrid(trim(self.Caption) + 'Tv2', Tv2, '梭织坯布仓库');
end;
end.

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,495 @@
unit U_TatClothStkList;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
RM_System, RM_GridReport, Menus, cxCalendar, MovePanel, Math, Clipbrd,
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, cxTextEdit, dxDateRanges,
dxBarBuiltInMenu, U_BaseList, cxPC, System.StrUtils, cxContainer, dxCore,
cxDateUtils, cxMaskEdit, dxScrollbarAnnotations, cxProgressBar, dxSkinsCore,
dxSkinsDefaultPainters, dxSkinBasic, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkroom, dxSkinDarkSide,
dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, dxSkinOffice2013LightGray,
dxSkinOffice2013White, dxSkinOffice2016Colorful, dxSkinOffice2016Dark,
dxSkinOffice2019Black, dxSkinOffice2019Colorful, dxSkinOffice2019DarkGray,
dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic,
dxSkinSharp, dxSkinSharpPlus, dxSkinSilver, dxSkinSpringtime, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinTheBezier, dxSkinValentine,
dxSkinVisualStudio2013Blue, dxSkinVisualStudio2013Dark,
dxSkinVisualStudio2013Light, dxSkinVS2010, dxSkinWhiteprint, dxSkinWXI,
dxSkinXmas2008Blue;
type
TfrmTatClothStkList = class(TfrmBaseList)
ToolBar1: TToolBar;
TBRafresh: TToolButton;
TBExport: TToolButton;
TBClose: TToolButton;
ADOQueryCmd: TADOQuery;
ADOQueryMain: TADOQuery;
ADOQueryTemp: TADOQuery;
DS_1: TDataSource;
GPM_1: TcxGridPopupMenu;
CDS_1: TClientDataSet;
ToolButton2: TToolButton;
ToolButton4: TToolButton;
PM_1: TPopupMenu;
PM11: TMenuItem;
N1: TMenuItem;
cxPageControl1: TcxPageControl;
cxTabSheet1: TcxTabSheet;
cxTabSheet2: TcxTabSheet;
Panel6: TPanel;
Label31: TLabel;
LBCPAP: TLabel;
BTLP: TButton;
BTNP: TButton;
TCBNOR: TComboBox;
Pnl_F1: TPanel;
Label3: TLabel;
Label7: TLabel;
Label10: TLabel;
Label5: TLabel;
lbl1: TLabel;
Label20: TLabel;
Label23: TLabel;
begtime: TDateTimePicker;
endTime: TDateTimePicker;
OrderNo: TcxTextEdit;
conNO: TcxTextEdit;
STKID: TcxTextEdit;
C_Name: TcxTextEdit;
C_Color: TcxTextEdit;
BCIOID: TcxTextEdit;
C_Pattern: TcxTextEdit;
C_Code: TcxTextEdit;
Pnl_F2: TPanel;
Label4: TLabel;
Label6: TLabel;
Label9: TLabel;
Label13: TLabel;
DateTimePicker3: TDateTimePicker;
DateTimePicker4: TDateTimePicker;
Edit1: TcxTextEdit;
Edit2: TcxTextEdit;
Edit4: TcxTextEdit;
Edit5: TcxTextEdit;
Edit8: TcxTextEdit;
GPM_2: TcxGridPopupMenu;
CDS_2: TClientDataSet;
DS_2: TDataSource;
cxGrid2: TcxGrid;
TV2: TcxGridDBTableView;
cxGridDBColumn2: TcxGridDBColumn;
cxGridDBColumn3: TcxGridDBColumn;
cxGridDBColumn4: TcxGridDBColumn;
cxGridDBColumn5: TcxGridDBColumn;
cxGridDBColumn7: TcxGridDBColumn;
cxGridDBColumn8: TcxGridDBColumn;
cxGridDBColumn9: TcxGridDBColumn;
cxGridDBColumn10: TcxGridDBColumn;
cxGridDBColumn11: TcxGridDBColumn;
cxGridDBColumn12: TcxGridDBColumn;
cxGridDBColumn13: TcxGridDBColumn;
cxGridDBColumn14: TcxGridDBColumn;
cxGridDBColumn15: TcxGridDBColumn;
cxGridDBColumn16: TcxGridDBColumn;
cxGridDBColumn18: TcxGridDBColumn;
cxGridLevel1: TcxGridLevel;
TV2Column3: TcxGridDBColumn;
Label18: TLabel;
Label19: TLabel;
Edit9: TcxTextEdit;
Edit10: TcxTextEdit;
Label8: TLabel;
Label14: TLabel;
Edit3: TcxTextEdit;
Edit11: TcxTextEdit;
PM_2: TPopupMenu;
MenuItem1: TMenuItem;
N2: TMenuItem;
TV2Column2: TcxGridDBColumn;
cxGrid1: TcxGrid;
Tv1: TcxGridDBTableView;
v1Column22: TcxGridDBColumn;
v1Column21: TcxGridDBColumn;
v1Column32: TcxGridDBColumn;
v1Column1: TcxGridDBColumn;
Tv1Column4: TcxGridDBColumn;
v1Column13: TcxGridDBColumn;
v1Column4: TcxGridDBColumn;
v1Column23: TcxGridDBColumn;
v1Column8: TcxGridDBColumn;
v1Column27: TcxGridDBColumn;
v1Column28: TcxGridDBColumn;
v1Column10: TcxGridDBColumn;
Tv1Column11: TcxGridDBColumn;
Tv1Column10: TcxGridDBColumn;
v1Column12: TcxGridDBColumn;
v1Column42: TcxGridDBColumn;
v1Column6: TcxGridDBColumn;
v1Column3: TcxGridDBColumn;
v1Column5: TcxGridDBColumn;
Tv1Column6: TcxGridDBColumn;
cxGrid1Level1: TcxGridLevel;
Label1: TLabel;
BegDate2: TcxDateEdit;
EndDate2: TcxDateEdit;
chk_F2: TcxCheckBox;
Label2: TLabel;
chk_F1: TcxCheckBox;
BegDate: TcxDateEdit;
EndDate: TcxDateEdit;
TV2Column1: TcxGridDBColumn;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure TBRafreshClick(Sender: TObject);
procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure TBExportClick(Sender: TObject);
procedure orderNoKeyPress(Sender: TObject; var Key: Char);
procedure BTNPClick(Sender: TObject);
procedure BTLPClick(Sender: TObject);
procedure TCBNORChange(Sender: TObject);
procedure JYTypeChange(Sender: TObject);
procedure ToolButton2Click(Sender: TObject);
procedure cxPageControl1Change(Sender: TObject);
procedure CDS_1BeforeOpen(DataSet: TDataSet);
procedure Tv1DataControllerFilterBeforeChange(Sender: TcxDBDataFilterCriteria; ADataSet: TDataSet; const AFilterText: string);
procedure ToolButton4Click(Sender: TObject);
procedure PM11Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure TV2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
procedure MenuItem1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure TV2CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
procedure Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
procedure Tv1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems6GetText(Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean; var AText: string);
private
CurrentPage, RecordsNumber: Integer;
lstPacketId: TStringList;
procedure InitGrid(WSql: string);
procedure InitPage();
procedure SetStatus();
{ Private declarations }
public
canshu1, FWorkshop: string;
{ Public declarations }
end;
implementation
uses
U_DataLink, U_RTFun, U_LabelPrint;
{$R *.dfm}
procedure TfrmTatClothStkList.InitPage();
begin
CurrentPage := 1;
case cxPageControl1.ActivePageIndex of
0:
begin
InitGrid(SGetHintFilters(Pnl_F2, 1, 2));
end;
1:
begin
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
end;
end;
procedure TfrmTatClothStkList.SetStatus();
begin
// if canshu1 then
end;
procedure TfrmTatClothStkList.FormClose(Sender: TObject; var Action: TCloseAction);
begin
inherited;
FreeAndNil(lstPacketId);
Action := caFree;
end;
procedure TfrmTatClothStkList.FormCreate(Sender: TObject);
begin
inherited;
lstPacketId := TStringList.Create;
EndDate.Date := SGetServerDateTime(ADOQueryTemp);
BegDate.Date := EndDate.Date - 20;
BegDate2.Date := BegDate.Date;
EndDate2.Date := EndDate.Date;
FWorkshop := trim(Self.fParameters3);
end;
procedure TfrmTatClothStkList.InitGrid(WSql: string);
begin
if Trim(WSql) <> '' then
WSql := ' and ' + WSql;
case cxPageControl1.ActivePageIndex of
0:
begin
if chk_F2.Checked then
begin
WSql := WSql + ' and IOTime>=' + quotedstr(FormatDateTime('yyyy-MM-dd', BegDate2.Date));
WSql := WSql + ' and IOTime<' + quotedstr(FormatDateTime('yyyy-MM-dd', enddate2.Date + 1));
end;
with ADOQueryMain do
begin
Filtered := False;
Close;
sql.Clear;
sql.Add(' select kl= DATEDIFF(dd,IOTime, GETDATE()), IOTime=CONVERT(VARCHAR(10),IOTime,120),OrderNo,C_Code,C_Name,IOType,Grade,CustName,C_Width,C_GramWeight,BatchNo,C_Color');
sql.Add(' ,COUNT(PieceNo) SumPieceNo,sum(GrossWeight) SumGrossWeight,sum(Tare) SumTare,sum(NetWeight) SumNetWeight');
sql.Add(' ,Sum(Meter) SumMeter,Sum(Yardage) SumYardage');
sql.Add(' from V_Tat_Cloth_Stk A where 1=1 ');
sql.Add(WSql);
sql.Add(' GROUP BY DATEDIFF(dd,IOTime, GETDATE()), CONVERT(VARCHAR(10),IOTime,120),OrderNo,C_Code,C_Name,IOType,Grade,CustName,C_Width,C_GramWeight,BatchNo,C_Color');
// showmessage(sql.text);
Open;
end;
SCreateCDS(ADOQueryMain, CDS_2);
SInitCDSData(ADOQueryMain, CDS_2);
TV2.DataController.Filter.Clear;
end;
1:
begin
if chk_F1.Checked then
begin
WSql := WSql + ' and IOTime>=' + quotedstr(FormatDateTime('yyyy-MM-dd', BegDate.Date));
WSql := WSql + ' and IOTime<' + quotedstr(FormatDateTime('yyyy-MM-dd', enddate.Date + 1));
end;
with ADOQueryMain do
begin
Filtered := False;
Close;
sql.Clear;
sql.Add(' select top ' + inttostr(RecordsNumber) + ' * ');
sql.Add(' from ');
sql.Add('(select rownumber=cast((row_number() over(order by AA.IOTime desc)) as int)');
sql.Add(',COUNT(1) OVER() AS TotalCount');
sql.Add(', kl= DATEDIFF(dd,IOTime, GETDATE()),* from V_Tat_Cloth_Stk AA where 1=1 ');
// if trim(FWorkshop) <> '' then
// sql.Add(' and Workshop=''' + trim(FWorkshop) + ''' ');
sql.Add('and 1=1 ' + WSql);
sql.Add(') temp_row');
sql.Add(' where rownumber> ' + inttostr(((CurrentPage - 1) * RecordsNumber)));
sql.Add(' order by rownumber');
// showmessage(sql.text);
Open;
end;
SCreateCDS(ADOQueryMain, CDS_1);
SInitCDSData(ADOQueryMain, CDS_1);
LBCPAP.Caption := inttostr(CurrentPage) + '/' + inttostr(ceil(CDS_1.FieldByName('TotalCount').AsInteger / RecordsNumber));
TV1.DataController.Filter.Clear;
end;
end;
end;
procedure TfrmTatClothStkList.TBRafreshClick(Sender: TObject);
begin
InitPage();
end;
procedure TfrmTatClothStkList.CDS_1BeforeOpen(DataSet: TDataSet);
begin
lstPacketId.Clear;
end;
procedure TfrmTatClothStkList.cxPageControl1Change(Sender: TObject);
begin
SetStatus();
end;
procedure TfrmTatClothStkList.TBCloseClick(Sender: TObject);
begin
Close;
end;
procedure TfrmTatClothStkList.FormShow(Sender: TObject);
begin
inherited;
ReadCxGrid(trim(self.Caption) + 'Tv1', Tv1, '梭织坯布仓库');
ReadCxGrid(trim(self.Caption) + 'Tv2', Tv2, '梭织坯布仓库');
CurrentPage := 1;
RecordsNumber := 500;
canshu1 := Trim(Self.fParameters1);
SetStatus();
InitPage();
end;
procedure TfrmTatClothStkList.TBExportClick(Sender: TObject);
begin
if ADOQueryMain.IsEmpty then
exit;
TcxGridToExcel(Self.Caption, cxGrid1);
end;
procedure TfrmTatClothStkList.orderNoKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
InitPage();
end;
end;
procedure TfrmTatClothStkList.PM11Click(Sender: TObject);
begin
SelOKNo(CDS_1, false);
end;
procedure TfrmTatClothStkList.Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName('kl').Index] > 90 then
ACanvas.Brush.Color := $B3DEF5;
end;
procedure TfrmTatClothStkList.Tv1DataControllerFilterBeforeChange(Sender: TcxDBDataFilterCriteria; ADataSet: TDataSet; const AFilterText: string);
begin
lstPacketId.Clear; //重新打开数据集前清空lstPacketId
end;
procedure TfrmTatClothStkList.Tv1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems6GetText(Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean; var AText: string);
begin
if lstPacketId <> nil then
AText := IntToStr(lstPacketId.Count);
end;
procedure TfrmTatClothStkList.TV2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
begin
BegDate.Date := BegDate2.Date;
EndDate.Date := EndDate2.Date;
chk_F2.Checked := chk_F1.Checked;
cxPageControl1.ActivePageIndex := 1;
SetStatus();
InitGrid(SGetCDSFilters(Tv2, CDS_2));
end;
procedure TfrmTatClothStkList.TV2CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName('kl').Index] > 90 then
ACanvas.Brush.Color := $B3DEF5;
end;
procedure TfrmTatClothStkList.BTNPClick(Sender: TObject);
begin
if CurrentPage < CDS_1.FieldByName('TotalCount').AsInteger / RecordsNumber then
CurrentPage := CurrentPage + 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.BTLPClick(Sender: TObject);
begin
if CurrentPage > 1 then
CurrentPage := CurrentPage - 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.TCBNORChange(Sender: TObject);
begin
RecordsNumber := StrToInt(TCBNOR.Text);
CurrentPage := 1;
InitGrid(SGetHintFilters(Pnl_F1, 1, 2));
end;
procedure TfrmTatClothStkList.JYTypeChange(Sender: TObject);
begin
CurrentPage := 1;
InitPage();
end;
procedure TfrmTatClothStkList.MenuItem1Click(Sender: TObject);
begin
Clipboard.SetTextBuf(PChar(Trim(CDS_2.fieldbyname(TV2.Controller.FocusedColumn.DataBinding.FilterFieldName).AsString)));
end;
procedure TfrmTatClothStkList.N1Click(Sender: TObject);
begin
SelOKNo(CDS_1, true);
end;
procedure TfrmTatClothStkList.N2Click(Sender: TObject);
begin
Clipboard.SetTextBuf(PChar(Trim(CDS_1.fieldbyname(TV1.Controller.FocusedColumn.DataBinding.FilterFieldName).AsString)));
end;
procedure TfrmTatClothStkList.ToolButton2Click(Sender: TObject);
var
WSql: string;
begin
if CDS_1.IsEmpty then
Exit;
if not CDS_1.Locate('SSel', True, []) then
begin
Application.MessageBox('没有选择数据!', '提示', 0);
Exit;
end;
WSql := '';
CDS_1.DisableControls;
with CDS_1 do
begin
First;
while not Eof do
begin
if CDS_1.fieldbyname('SSel').AsBoolean then
begin
if WSql <> '' then
begin
WSql := WSql + ',' + QuotedStr(Trim(CDS_1.fieldbyname('CIID').AsString));
end
else
begin
WSql := QuotedStr(Trim(CDS_1.fieldbyname('CIID').AsString));
end;
end;
Next;
end;
end;
ShowMessage(WSql);
CDS_1.Locate('SSel', True, []);
CDS_1.EnableControls;
try
frmLabelPrint := TfrmLabelPrint.Create(Application);
with frmLabelPrint do
begin
FLMType := 'TatClothStk';
FFiltration1 := WSql;
if ShowModal = 1 then
begin
end;
end;
finally
frmLabelPrint.Free;
end;
end;
procedure TfrmTatClothStkList.ToolButton4Click(Sender: TObject);
begin
WriteCxGrid(trim(self.Caption) + 'Tv1', Tv1, '梭织坯布仓库');
WriteCxGrid(trim(self.Caption) + 'Tv2', Tv2, '梭织坯布仓库');
end;
end.

View File

@ -475,6 +475,7 @@ inherited frmTatDRList: TfrmTatDRList
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom
Control = cxGrid2
ExplicitWidth = 8
end
object cxGrid2: TcxGrid [5]
Left = 0

View File

@ -12,7 +12,23 @@ uses
RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, cxPC, cxButtonEdit,
cxDropDownEdit, cxTextEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
dxBarBuiltInMenu, U_BaseList, dxDateRanges, dxScrollbarAnnotations,
cxContainer, cxProgressBar, dxSkinsCore, dxSkinsDefaultPainters;
cxContainer, cxProgressBar, dxSkinsCore, dxSkinsDefaultPainters, dxSkinBasic,
dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee,
dxSkinDarkroom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast,
dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky,
dxSkinMcSkin, dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinOffice2016Colorful,
dxSkinOffice2016Dark, dxSkinOffice2019Black, dxSkinOffice2019Colorful,
dxSkinOffice2019DarkGray, dxSkinOffice2019White, dxSkinPumpkin, dxSkinSeven,
dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, dxSkinSilver,
dxSkinSpringtime, dxSkinStardust, dxSkinSummer2008, dxSkinTheAsphaltWorld,
dxSkinTheBezier, dxSkinValentine, dxSkinVisualStudio2013Blue,
dxSkinVisualStudio2013Dark, dxSkinVisualStudio2013Light, dxSkinVS2010,
dxSkinWhiteprint, dxSkinWXI, dxSkinXmas2008Blue;
type
TfrmTatDRList = class(TfrmBaseList)

View File

@ -1,114 +1,114 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.215,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.770,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.679,D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInImport.pas=D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.323,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.252,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.136,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.010,D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradePlanSel.dfm=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.883,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothStkList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.881,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradePlanClothEnterInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.679,D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInImport.dfm=D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInEdit.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.591,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothCompleteInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.379,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\T02贸易汇总仓库\U_testdll.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.656,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.770,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.389,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFinishClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.282,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.202,=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.323,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.456,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.350,=D:\Dp10RepoV1\项目代码\永亮\T02贸易汇总仓库\U_TradeGreyClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.908,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeGreyClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.215,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.890,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalOutList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutEdit.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.252,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.883,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.545,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.699,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.881,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradePlanClothEnterInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.908,D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_PictureList.pas=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.295,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.202,=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.010,D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.pas=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.656,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.282,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.890,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalOutList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.881,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradePlanClothEnterInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.473,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.647,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessOutInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.908,D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_PictureList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.010,D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.dfm=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradePlanSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.839,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothScheduleList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.010,D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradePlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.472,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.929,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.018,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeGreyClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.266,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.484,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.545,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.801,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.295,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.484,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.929,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.889,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.456,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.266,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.591,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothCompleteInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.545,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.472,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.647,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessOutInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.110,=D:\Dp10RepoV1\项目代码\花蝴蝶\T02贸易汇总仓库\U_TradeFinishClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.890,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.246,=D:\Dp10RepoV1\项目代码\D10szYueXiang\T02贸易汇总仓库\U_CollectImport.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.307,=D:\Dp10RepoV1\项目代码\花蝴蝶\T02贸易汇总仓库\U_TradeFinishClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutEdit.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.795,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.215,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.336,=D:\Dp10Repo\项目代码\RTBasics\T02贸易汇总仓库\U_TradeClothOutInspList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.881,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradePlanClothEnterInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_PurClothEnterInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.591,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothCompleteInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.795,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.713,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInEdit.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.210,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.038,=D:\Dp10RepoV1\项目代码\花蝴蝶\T02贸易汇总仓库\U_TradeFinishClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.046,=D:\Dp10RepoV1\public10\ThreeFun\Fun\U_printPdf.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.549,=D:\Dp10RepoV1\项目代码\须上\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.780,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.226,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradePlanSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.889,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeTotallClothStkSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.210,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.435,=D:\Dp10Repo\项目代码\RTBasics\T02贸易汇总仓库\U_TradeGreyClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.549,=D:\Dp10RepoV1\项目代码\须上\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.647,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessOutInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.545,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.473,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.780,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.892,=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.662,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.889,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothOutList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.029,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothStkSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.478,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.839,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothScheduleList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.893,D:\Dp10Repo\项目代码\RTBasics\G02贸易汇总仓库\TradeTotalClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\G02贸易汇总仓库\InformationBase.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.621,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.435,=D:\Dp10Repo\项目代码\RTBasics\T02贸易汇总仓库\U_TradeGreyClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.591,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothCompleteInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.679,D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInEdit.dfm=D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInImport.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.224,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.662,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.029,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothStkSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.018,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeGreyClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.908,D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_PictureList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.892,=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.478,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.621,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.129,=D:\Dp10Repo\项目代码\路尚\T00贸易通用窗体\U_PurchaseContractSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.558,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFtyClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.456,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.659,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInInput.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.883,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothStkList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.484,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutEdit.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTransferInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.456,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.136,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalStkList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.770,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.389,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFinishClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.136,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalStkList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.679,D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInEdit.pas=D:\Dp10RepoV1\项目代码\D10myXushang\T02贸易汇总仓库\U_TradeSampleClothInImport.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.585,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothStkSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.033,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothOutEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899/12/30 00:00:00.000.136,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalStkList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.484,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeSampleClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.585,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothStkSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.647,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessOutInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothProcessCastingInput.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.722,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFinishClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.890,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.327,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.908,D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_PictureList.dfm=D:\Dp10Repo\项目代码\雅尚\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.839,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothScheduleList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.215,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothOutList.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothOutList.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.893,D:\Dp10Repo\项目代码\RTBasics\G02贸易汇总仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\G02贸易汇总仓库\TradeTotalClothStk.dproj</Transaction>
<Transaction>1899/12/30 00:00:00.000.247,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInEdit.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInInput.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.883,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothStkList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothStkList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.839,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothScheduleList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.327,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradePackClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.465,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothTotalInInput.dfm=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInEdit.dfm</Transaction>
<Transaction>1899/12/30 00:00:00.000.722,=D:\Dp10RepoV1\项目代码\RTBasicsV1\T02贸易汇总仓库\U_TradeFinishClothInEdit.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.591,=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_ClothPurchaseEnterList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.770,D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeClothInList.pas=D:\Dp10RepoV1\项目代码\须上\T02贸易汇总仓库\U_TradeFinishClothInList.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.659,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="..\..\D10SZKaiXiYa"/>