修改编辑器选择细节
This commit is contained in:
parent
4a548c4861
commit
ecd035891d
Binary file not shown.
|
|
@ -2177,7 +2177,7 @@ type TCustomMemo = class(TCustomScrollControl,TCustomMemoCmd) //
|
||||||
c := 1;
|
c := 1;
|
||||||
end else
|
end else
|
||||||
begin
|
begin
|
||||||
c := Column2StrPos(r,Integer((x-FGutter.Width)/fCharWidth+0.5)+FLeftChar);
|
c := Column2StrPos(r,Integer((x-FGutter.Width)/fCharWidth+0.1)+FLeftChar);
|
||||||
end
|
end
|
||||||
return array(r,max(1,c));
|
return array(r,max(1,c));
|
||||||
end
|
end
|
||||||
|
|
|
||||||
BIN
tsleditor.exe
BIN
tsleditor.exe
Binary file not shown.
BIN
tslvcltool.exe
BIN
tslvcltool.exe
Binary file not shown.
Loading…
Reference in New Issue