Problem with "Parent"
lazarus / 13-General

----------------------------------------------------------------------
qodah · 2006-08-15 00:52

This is my problem.
I use Form to Parent to TabSheet, the source code:

Code: [Select]procedure FormToTabSheet( vForm : TForm; vSheet :
TTabSheet);
begin
  vForm.BorderStyle    := Dialog;
  vForm.Parent            := vSheet;
  vForm.Align              := Client;
  vForm.Visible           := True;
end;

and i implement:   Code: [Select]FormToTabSheet(Form1, TabSheet1);

In Linux this source is well, like i want the Form likes Panel
but in Windows the form become MDIChild or likes Form in Form.

How can i fix this problem? I just want the procdure in Windows as
well as Linux.

----------------------------------------------------------------------
felipemdc · 2006-08-27 11:33

Maybe you could instead write a procedure that will iterate throught
all components inside the form, and put them on the panel.

----------------------------------------------------------------------
CCRDude · 2006-09-06 07:56

There seems to be a curious problem with tabsheets and pagecontrols...

I had to decide whether to use Delphi with nice docking, or Lazarus
with just some page controls and deciding into which page control a
tab would be placed. I decided for Lazarus of course

Now I can dynamically create tabsheets in controls. Just create the
TTabSheet, set its Parent, then PageControl to the pagecontrol, and
there it is. Sometimes the caption doesn't refresh, but well...

The problem is when I try to move them to another pagecontrol. That's
easy in Delphi: I change Parent and PageControl, and it appears in the
other pagecontrol. Not so in Lazarus, where those tabs just vanish
:roll:

Is there any workaround for this that makes it possible to move
tabsheets between tabs?
Except for creating custom panels instead of tabs and moving those
panels, that is (thanks for this topic for bringing up this
possibility  ).
I've tried with both my way-too-old CE snapshot, and an august 24th
snapshot. Will download a newer one as well now...

edit: well, moving panels is an acceptable workaround anyway... but
the tab captions which appear only after clicking them are ugly.
Anything about this?

Also funny: for i := 0 to 3 do add toolbutton with caption i to
toolbar will result in tool buttons 2,3,0,1 ... and not the order they
were created

@edit#2: as a workaround, I did set Left := -1 for each newly added
button (well and went from 3 downto 0 of course), that caused a fixed
order (because actually the order wasn't even reproducable 2,3,0,1,
but also 2,3,1,0 sometimes  ).