From 6c56c29ae5ff251a1337936e24cddd01812c7c8e Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 8 Jul 2008 17:59:05 +0000
Subject: [PATCH] IDE: added debugging for frame events

git-svn-id: trunk@15709 -
---
 ide/main.pp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/ide/main.pp b/ide/main.pp
index 3946f1977a..cf31c9a106 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -1430,6 +1430,9 @@ begin
   end else if IsJITMethod(Method) then begin
     JITMethod:=TJITMethod(Method.Data);
     Result:=JITMethod.TheMethodName;
+    {$IFDEF EnableTFrame}
+    DebugLn(['TMainIDE.OnPropHookGetMethodName ',dbgsName(GlobalDesignHook.LookupRoot),' ',dbgsName(JITMethod.TheClass)]);
+    {$ENDIF}
     if GlobalDesignHook.LookupRoot.ClassType<>JITMethod.TheClass then begin
       Result:=JITMethod.TheClass.ClassName+'.'+Result;
     end;