Controls Loose ability to be Anchored to the Right
Original Reporter info from Mantis: Avishai
-
Reporter name: Avishai
Original Reporter info from Mantis: Avishai
- Reporter name: Avishai
Description:
The following code causes controls to loose ability to be Anchored to the Right.
var
Cover: TCustomControl;
procedure TForm1.FormShow(Sender: TObject);
begin
Cover:= TCustomControl.Create(Self);
with Sender as TForm do
while ControlCount>0 do
Controls[0].Parent:= Cover;
with Cover do begin
Parent:= Form1;
Align:= alClient;
end;
end;
Mantis conversion info:
- Mantis ID: 20792
- Version: 0.9.31 (SVN)
- Monitored by: » Avishai (Avishai)