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

qt intf: undo 20743

Browse Source 
git-svn-id: trunk@30745 -
This commit is contained in:
mattias 2011-05-15 12:16:33 +00:00
parent acb07766c4
commit 937fe55e63
2 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/syneditpointclasses.pas
View File

@ -31,7 +31,7 @@ unit SynEditPointClasses;
{$I synedit.inc}
{off $DEFINE SynCaretDebug}
{$DEFINE SynCaretDebug}
interface

5
lcl/interfaces/qt/qtcaret.pas
View File

@ -28,7 +28,7 @@ unit QtCaret;
interface
{off $DEFINE VerboseQtCaret}
{$DEFINE VerboseQtCaret}
{$I qtdefines.inc}
@ -427,8 +427,7 @@ begin
' Y=',Value.Y,' OldX=',FPos.X,' OldY=',FPos.Y,' Dirty=',FCaretDirty);
{$ENDIF}
if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil)
or (FWidget.Context=0) then
if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil) then
begin
// oops, our caret is dirty here.
FCaretDirtyPos := FPos;