Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 222
  • Last Modified:

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
0
__alex
Asked:
__alex
  • 2
1 Solution
 
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

Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now