Se puede hacer esto?

marcoszorrilla · #2 22-10-2005

Creo que según tu planteamiento de alineación alTop no sería posible, pues el primer Tpanel que recibe la instrucción pasa a ocupar el ancho del formulario, por lo tanto el segundo queda debajo.

Mira este código a modo de ejemplo, llamándolo desde los eventos oportunos te puede servir como base:

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
begin
panel1.Top:=0;
panel2.Top:=0;
panel1.Width:=StrToInt(FormatFloat('0',(Form1.width / 2)));
panel2.Width:=StrToInt(FormatFloat('0',(Form1.width / 2)));
panel1.Left:=0;
panel2.Left:=Form1.Width - panel2.Width;
end;

Un Saludo.