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

debugging

Browse Source 
git-svn-id: trunk@26534 -
This commit is contained in:
mattias 2010-07-08 20:24:51 +00:00
parent 067f4ebeb2
commit 77c0853887
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/sourceeditor.pp
View File

@ -36,6 +36,8 @@ interface
{$I ide.inc} {$I ide.inc}
{ $DEFINE VerboseIDECompletionBox}
uses uses
{$IFDEF IDE_MEM_CHECK} {$IFDEF IDE_MEM_CHECK}
MemCheck, MemCheck,

1
lcl/interfaces/gtk2/gtk2callback.inc
View File

@ -868,6 +868,7 @@ begin
// it is already active // it is already active
// do not send this message to the LCL // do not send this message to the LCL
// to prevent setting AForm.ActiveControl:=nil // to prevent setting AForm.ActiveControl:=nil
//debugln(['GTKFocusCBAfter ',DbgSName(LCLObject),' send=',event^.send_event,' window=',dbgs(event^.window),' in=',event^._in,' type=',event^._type]);
exit(true); exit(true);
end; end;
// MG: maybe better send a LM_ACTIVATE instead of a LM_SETFOCUS message? // MG: maybe better send a LM_ACTIVATE instead of a LM_SETFOCUS message?