paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-02 09:29:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Improved Syncro-Edit / removed accidental committed debugln

Browse Source 
git-svn-id: trunk@25250 -
This commit is contained in:
martin 2010-05-08 14:35:38 +00:00
parent 288974e28c
commit ba8e8616b1
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/synpluginsyncronizededitbase.pp
View File

@ -1142,11 +1142,9 @@ begin
c2 := Cells.IndexOf(aX - aCount, aY, True)
else
c2 := c1;
debugln(['----- c1=',c1,' c2=',c2,' ay=',ay,' ax=',ax,' aLineBrkCnt=',aLineBrkCnt,' aCount=',aCount,' FExternalEditLock=',FExternalEditLock,' FPaintLock=', FPaintLock,' FOwnPaintLock=',FOwnPaintLock]);
// allow edit outside cell? (only if not partly cell / part cell updates are not allowed at all)
// Todo, could be just on the edge of a cell !
if (c1 = c2) and (FExternalEditLock > 0) then begin
debugln(['exit for external']);
exit;
end;
// shared editor, outside cells
@ -1154,11 +1152,9 @@ debugln(['exit for external']);
if (c1 < 0) and (c2 < 0) then
exit;
c1 := -1; // shared Eitor in cell => deactivate
debugln(['deactivate for shared']);
end;
if (CurrentCell < 0) or (c1 < 0) or (c2 <> c1) then begin
debugln(['deactivate']);
Clear;
Active := False;
end;