Splitter woes

Hi,

my form looks like this:
------------------------------
Panel1   Splitter1   Panel2
alClient  alRight     alRight
------------------------------
If I change the parent property of the form (Nil -> TabSheet, TabSheet -> Nil) my controls might get messed up: the splitter appears on the very right of the form. This is obviously nonsense since there's nothing left to split. It does not always happen but depends on the size of the controls. Anyone?

TIA
LVL 2
__alexAsked:
Who is Participating?
 
esoftbgCommented:
procedure TForm2.SpeedButton1Click(Sender: TObject);
begin
  Parent := Form1.TabSheet1;
  Splitter1.Left := Panel2.Left - Splitter1.Width - 2;
end;

procedure TForm2.SpeedButton2Click(Sender: TObject);
begin
  Parent := nil;
  Splitter1.Left := Panel2.Left - Splitter1.Width - 2;
end;

emil
0
 
__alexAuthor Commented:
Thank you!
BTW Splitter1.Left := 0 is sufficient.
0
 
esoftbgCommented:
You are welcome !
Wow !
Splitter1.Left := 0;
is the best !
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.