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

编辑器 

修正文件夹查找
This commit is contained in:
JianjunLiu 2023-04-26 10:39:22 +08:00
parent 5efd806288
commit 14e4839144
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
designer/utslcodeeditor.tsf
View File

@ -3860,7 +3860,7 @@ type TEditer=class(TCustomcontrol) //
if not((wrp .& 2) >1) then ctl := ctl+"\\b"; if not((wrp .& 2) >1) then ctl := ctl+"\\b";
end end
if cw then ctl2 += "i"; if cw then ctl2 += "i";
linesi := array(1:1); linesi := array(0:1);
if (1 = readfile(rwraw(),"",f,0,filesize("",f),s)) and s then if (1 = readfile(rwraw(),"",f,0,filesize("",f),s)) and s then
begin begin
strcode := 0; strcode := 0;
@ -3904,6 +3904,7 @@ type TEditer=class(TCustomcontrol) //
end end
//////////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////////
slen := length(s); slen := length(s);
orid := -1;
if 1= parseregexpr(ctl,s,ctl2,m,mp,mlen) then if 1= parseregexpr(ctl,s,ctl2,m,mp,mlen) then
begin begin
r := array(); r := array();