修正一个手误

This commit is contained in:
liujianjun 2025-01-22 16:42:24 +08:00
parent b140a942df
commit 5732a251bf
5 changed files with 4 additions and 4 deletions

View File

@ -3748,7 +3748,6 @@ type TEditer=class(TCustomcontrol) //
begin
f := d["file"];
nf :=(f?(cmp.GetFileFullPath(f)):GetCurrentItem().OrigScriptPath);
//echo "\r\n",nf,"===",d["line"];
OpenAndGotoFileByName(nf,d["line"]);
end
cit := GetCurrentItem();

View File

@ -1800,7 +1800,8 @@ type TTsfFileParser = class() //
"getfullpath":
begin
if not ifarray(FFilePaths) then return "";
return FFilePaths[lowercase(d["value"])+".tsf"];
r := FFilePaths[lowercase(d["value"])+".tsf"];
return r;
end
"getprojecttsfs":
begin
@ -2210,8 +2211,8 @@ type TTsfFileParser = class() //
r := array();
rdd :="";
end
//r["fullpath"] := pfn;
r["name"] := fn;
r["fullpath"] := pfn;
//r["name"] := fn;
if (aid := pos("@",fn)) then
begin
nn := fn[1:(aid-1)];

Binary file not shown.

Binary file not shown.

Binary file not shown.