[JVCL-Checkins] SF.net SVN: jvcl:[12621] trunk/jvcl/run/JvDockControlForm.pas

[<wp...@us...>]

Revision: 12621
          http://jvcl.svn.sourceforge.net/jvcl/?rev=12621&view=rev
Author:   wpostma
Date:     2009-12-21 19:41:39 +0000 (Mon, 21 Dec 2009)

Log Message:
-----------
JvDockControlForm.pas - Mantis # 5023 - change base class of TJvDockableForm BACK to TForm, which clears up
a series of hard to find docking glitches, including but not limited to mantis # 5023.

Modified Paths:
--------------
    trunk/jvcl/run/JvDockControlForm.pas

Modified: trunk/jvcl/run/JvDockControlForm.pas
===================================================================
--- trunk/jvcl/run/JvDockControlForm.pas	2009-12-19 15:53:00 UTC (rev 12620)
+++ trunk/jvcl/run/JvDockControlForm.pas	2009-12-21 19:41:39 UTC (rev 12621)
@@ -697,7 +697,7 @@
      and TJvDockTabHostForm which are the base classes for the two kinds of
      docked-views possible for handling multiple controls docked to the same
      dock site. }
-  TJvDockableForm = class(TJvForm)
+  TJvDockableForm = class(TForm) { DO NOT MAKE THIS TJvForm! Mantis # 5023 }
   private
     FDockClient: TJvDockClient;
     FDockableControl: TWinControl;
@@ -1514,8 +1514,8 @@
   TabHost: TJvDockTabHostForm;
   DockClient1, DockCLient2: TJvDockClient;
   ScreenPos: TRect;
-  otherForm:TForm;
-  n:Integer;
+//  otherForm:TForm;
+//  n:Integer;
 begin
   DockClient1 := FindDockClient(Form1);
   Form1.Hide;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.