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

qt intf: fixed showing caret when FWIdget got context, bug #16905

Browse Source 
git-svn-id: trunk@30744 -
This commit is contained in:
mattias 2011-05-15 12:11:38 +00:00
parent 82f5d6ef1c
commit acb07766c4
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

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