编辑器
优化目录打开
This commit is contained in:
@@ -3193,6 +3193,8 @@ type tgtkapis = class() //gtk
|
||||
function openresourcemanager(p); //打开资源管理器
|
||||
begin
|
||||
if ifstring(p) then
|
||||
begin
|
||||
if fileexists("","/usr/bin/caja") then
|
||||
begin
|
||||
for i := length(p) downto 1 do
|
||||
begin
|
||||
@@ -3202,6 +3204,8 @@ type tgtkapis = class() //gtk
|
||||
break;
|
||||
end
|
||||
end
|
||||
return ;//
|
||||
end
|
||||
tsl_gtk_execsystem(format('nautilus "%s" &',p));
|
||||
return 1;
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user