On Mon, 5 Apr 2010 22:13:11 +0200 (CEST) Michael Van Canneyt <[email protected]> wrote:
> > Hello, > > After the recent AutoSize fixes of Mattias, easy docking with default LCL > code is in sight. > > I do propose the following fix for TControl.DoDock: > > Change > > // adjust new bounds, so that they at least fit into the client area of > // its parent > LCLProc.MoveRectToFit(ARect, NewDockSite.GetLogicalClientRect) > > To > // adjust new bounds, so that they at least fit into the client area of > // its parent > IF not NewDockSite.AutoSize then > LCLProc.MoveRectToFit(ARect, NewDockSite.GetLogicalClientRect) > else > ARect:=Rect(0,0,Width,Height); Thanks. Applied. Mattias -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
