forked from liujianjun/tslediter
设计器
工程文件移除时间戳
This commit is contained in:
@@ -1589,7 +1589,7 @@ end
|
|||||||
d["files"]:= files;
|
d["files"]:= files;
|
||||||
d["mainform"]:= FMainForm;
|
d["mainform"]:= FMainForm;
|
||||||
d["entryscript"]:= FExecEntry;
|
d["entryscript"]:= FExecEntry;
|
||||||
d["time"]:= datetimetostr(now());
|
//d["time"]:= datetimetostr(now());
|
||||||
d["commandline"]:= FTslEditer.getExecuteEditerSetcmdline();
|
d["commandline"]:= FTslEditer.getExecuteEditerSetcmdline();
|
||||||
r := FormatTslData(d);
|
r := FormatTslData(d);
|
||||||
ReWriteString(FOpenProjectFile,r);
|
ReWriteString(FOpenProjectFile,r);
|
||||||
@@ -1603,7 +1603,7 @@ end
|
|||||||
begin
|
begin
|
||||||
//echo tostn(d);
|
//echo tostn(d);
|
||||||
try
|
try
|
||||||
if ifstring(d)then d := eval(&d);
|
if ifstring(d) then d := eval(&d);
|
||||||
except
|
except
|
||||||
end
|
end
|
||||||
if ifarray(d)then
|
if ifarray(d)then
|
||||||
|
|||||||
Reference in New Issue
Block a user