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;