liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

编辑器 

批量关闭标签问题
This commit is contained in:
JianjunLiu 2023-03-22 18:00:03 +08:00
parent c313f5df82
commit 7ba6a5b974
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
designer/utslcodeeditor.tsf
View File

@ -261,9 +261,9 @@ type TPage=class(TCustomControl) //
end else end else
if idx<FItemIndex then if idx<FItemIndex then
begin begin
FItemIndex := FItemIndex-1; FItemIndex := FItemIndex-1;
FCurrentItem := FPageItems[FItemIndex]; FCurrentItem := FPageItems[FItemIndex];
end end
InValidateRect(nil,false); InValidateRect(nil,false);
end end
end end
@ -2370,6 +2370,7 @@ type TEditer=class(TCustomcontrol) //
begin begin
docloseapageitem(iti); docloseapageitem(iti);
end end
if itss then FPageEditer.CallSelChanged();
end end
"关闭右侧所有": "关闭右侧所有":
begin begin
@ -2386,9 +2387,9 @@ type TEditer=class(TCustomcontrol) //
if iti=it then if iti=it then
begin begin
dodel := 1; dodel := 1;
end ; end ;
end end
if dodel then FPageEditer.CallSelChanged();
end end
"关闭其他标签": "关闭其他标签":
begin begin