|
@@ -253,7 +253,7 @@ begin
|
|
|
vReport := TReport.Create;
|
|
|
vReport.Owner := Self;
|
|
|
vReport.ID := StrToInt(vSL.Values['报表ID']);
|
|
|
- vReport.Category := vSL.Values['分类名称'];
|
|
|
+// vReport.Category := vSL.Values['分类名称']; // 分类不取本地文件,取线上的。
|
|
|
vReport.FileName := SRec.Name;
|
|
|
vReport.LocalVer := vSL.Values['版本'];
|
|
|
FList.Add(vReport);
|
|
@@ -289,8 +289,12 @@ begin
|
|
|
iID := StrToInt(VersArr[i, 0]);
|
|
|
vReport := FindReprot(iID);
|
|
|
if vReport <> nil then
|
|
|
+ begin
|
|
|
vReport.NewestVer := VersArr[i, 1];
|
|
|
- ChangeRec(cdsLocal, vReport, ctAdd);
|
|
|
+ vReport.NewestMemo := ReplaceChars(VersArr[i, 3]);
|
|
|
+ vReport.Category := VersArr[i, 2];
|
|
|
+ ChangeRec(cdsLocal, vReport, ctAdd);
|
|
|
+ end;
|
|
|
end;
|
|
|
end
|
|
|
else
|