paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-03 23:48:40 +01:00
Code Issues Packages Projects Releases Wiki Activity

examples; anchordocking: improved two sibling example

Browse Source 
git-svn-id: trunk@14051 -
This commit is contained in:
mattias 2008-02-09 18:08:20 +00:00
parent 8d5086eb31
commit a6b0e52b35
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
examples/anchordocking/dockform1unit.pas
View File

@ -131,6 +131,7 @@ begin
ClearLayout;
Form1:=CreateNewForm;
with Form1 do SetBounds(Left,Top,400,200);
Form2:=CreateNewForm;
DockingManager.Manager.InsertControl(Form2,alRight,Form1);
end;