2

enter image description hereI have a main form with a left panel and in the center of the form I have a page control..and I am trying to dock other forms on the page control, as I have seen on an example made by Alister Christie; the thing is that the dragging of forms into the pagecontrol is lazy; I've discovered that a JVCL dockserver and a JVCL dockclient will help me with this.. the thing is that I want to assign pagecontrol to JVCL dockserver as a custom dock panel, but i don't know how to do it: here is the code i wrote on the oncreate event of mainform 

procedure Tform1.FormCreate(Sender: TObject);  
begin  
  jvdockserver1.CustomDockPanel := jvpagecontrol1;  
end;

could you please help me out? Forgot to mention that I am a kind of a novice in programmning and I am using Delphi XE2;

Cristian Vasuica
  • 369
  • 9
  • 22
  • there are some other interesting JvDocking things here on stackoverflow: http://stackoverflow.com/questions/9068016/delphi-jvdockserver-jvdockclient-notification-for-undocking-floating-of-a-clie – Warren P Mar 27 '12 at 18:28

1 Answers1

1

The JVCL Docking server component can only accept a PANEL as a docking location, either one of the built in ones, or a custom TPanel that you place on your form at designtime. However the Jedi Docking library will create page controls for you if you want it to. However, it has to be the one that manages them, because those controls could get moved (by you or by some other jvdocking code).

So, if you want to have some tabs visible, you should not try to use your own page control, instead you should use the Docking In Code Demo as your sample, which comes with the JVCL, in the folder jvcl\examples\JvDocking\DockingInCode.

Here is what the tabs look like that the JvDocking system makes for you, using the CustomDockPanel where the custom dock panel is attached to a TPanel, and then JvDocking "creates a page control" automatically for you when you need it:

enter image description here

Note that the pages are created or destroyed by the docking system, and the underlying work of managing the tabs is done by the JvDocking library, not by you.

The main thing you need to do is use this code from MainFm.pas:

tabHost := ManualTabDock( ctrl, newDocFm1,  newDocFm2);
Warren P
  • 65,725
  • 40
  • 181
  • 316
  • P-> first of all thank you Warren for answering so fast: i have downloaded again the examples for jvcl docking library and here is the thing: i compiled the project above in delphi xe2 and this is what i get when i click the tabdock button: " ManualTabDock:Ttabhost not created. Your docking style may not support tabbed docking". Do you another good docking library that could help me do the same thing? – Cristian Vasuica Mar 28 '12 at 08:56
  • Docking styles that work with the Tab Dock are included with Jedi VCL. Your problem is that you didn't put a Docking Style component onto your form. You could read the documentation if we had any (SORRY! Not much there) but if you follow the samples, and notice that the docking style JvDockVIDStyle and various others all support tab docks. Use the docking in code demo as your starting code. Definitely it works in XE2 I just tested it. – Warren P Apr 24 '12 at 22:51
  • P---> hi there Warren; i have opened the project from JvDocking called Docking_in_Code: all the options in the left aligned panel(Sibling DOck, Cojoined Dock) are working, but when i click Tab Dock this is the message that I get **"ManualTabDock:Ttabhost not created. Your docking style may not support tabbed docking"** - the picture above your`s . maybe the problem could be this: i only have update2 for xe2 installed; should i install update4 instead? – Cristian Vasuica Apr 25 '12 at 12:11
  • More likely you have an invalid or very very OLD copy of the JVCL. iF NOT, then ask a new question. – Warren P Apr 28 '12 at 12:31