diff --git a/designer/objectinspector.pp b/designer/objectinspector.pp
index 483f4a8c21..eaf8126bfd 100644
--- a/designer/objectinspector.pp
+++ b/designer/objectinspector.pp
@@ -1364,6 +1364,7 @@ begin
   FPropertyEditorHook:=nil;
   FComponentList:=TComponentSelectionList.Create;
   FUpdatingAvailComboBox:=false;
+  Name := 'ObjectInspector';
 
   // StatusBar
   StatusBar:=TStatusBar.Create(Self);
diff --git a/lcl/include/customform.inc b/lcl/include/customform.inc
index 381007cfc1..62ea2f9b75 100644
--- a/lcl/include/customform.inc
+++ b/lcl/include/customform.inc
@@ -205,6 +205,8 @@ end;
  ------------------------------------------------------------------------------}
 procedure TCustomForm.WMSize(var Message: TLMSize);
 Begin
+Writeln('[TCUSTOMFORM].WMSIZE');
+Writeln(Format('Size is width=%d    height= %d',[Message.Width,MEssage.height]));
 Assert(False, 'Trace:WMSIZE in TCustomForm');
 if not (csDesigning in ComponentState) then
     Case Message.SizeType of
@@ -853,6 +855,10 @@ end;
 { =============================================================================
 
   $Log$
+  Revision 1.13  2001/02/28 13:17:33  lazarus
+  Added some debug code for the top,left reporting problem.
+  Shane
+
   Revision 1.12  2001/02/06 20:59:17  lazarus
   Trying to get the last control of the last form focused when a dialog closes.
   Still working on it.
diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc
index 47ccb73ea3..5bb5b8aad7 100644
--- a/lcl/include/wincontrol.inc
+++ b/lcl/include/wincontrol.inc
@@ -1403,6 +1403,9 @@ end;
 procedure TWinControl.WMMove(var Message: TLMMove);
 begin
   { Just sync the coordinates }
+Writeln('[TWINCONTROL].WMMOVE');
+Writeln(Format('MOVE is LEft=%d    Top= %d',[Message.XPos,MEssage.YPos]));
+
   FLeft := Message.XPos;
   FTop  := Message.YPos;
   { TODO : When anchors are implemented, update its rules instead }
@@ -1929,6 +1932,10 @@ end;
 { =============================================================================
 
   $Log$
+  Revision 1.20  2001/02/28 13:17:33  lazarus
+  Added some debug code for the top,left reporting problem.
+  Shane
+
   Revision 1.19  2001/02/06 20:59:17  lazarus
   Trying to get the last control of the last form focused when a dialog closes.
   Still working on it.
diff --git a/lcl/interfaces/gtk/gtkcallback.inc b/lcl/interfaces/gtk/gtkcallback.inc
index b4e1dd4ed5..782be94fdb 100644
--- a/lcl/interfaces/gtk/gtkcallback.inc
+++ b/lcl/interfaces/gtk/gtkcallback.inc
@@ -594,6 +594,15 @@ begin
   finally
     Dispose(PosMsg.WindowPos);
   end;
+
+Writeln('***********************');
+Writeln('[gtksize_allocateCB]');
+Writeln(Format('Size is stated as x=%d y=%d width=%d height=%d',[Size^.x,Size^.y,Size^.width, Size^.height]));
+Writeln('if PosMsg.Result <> 0 then it sends out a LMMOVE and LMSIZE');
+Writeln(Format('PosMsg.Result is %d',[PosMsg.Result]));
+if (TOBject(data) is TWinControl) then
+Writeln('The control name is '+TControl(data).Name);
+Writeln('***********************');
   
   if (PosMsg.Result <> 0 ) then 
   begin
@@ -1080,6 +1089,10 @@ end;
 { =============================================================================
 
   $Log$
+  Revision 1.23  2001/02/28 13:17:34  lazarus
+  Added some debug code for the top,left reporting problem.
+  Shane
+
   Revision 1.22  2001/02/20 16:53:27  lazarus
   Changes for wordcompletion and many other things from Mattias.
   Shane