Ver Mensaje Individual
  #3  
Antiguo 11-11-2013
cocute cocute is offline
Miembro
 
Registrado: nov 2008
Posts: 403
Reputación: 16
cocute Va por buen camino
Cual es el modo correcto de usar la opción de escalar

Mi intención es que al al redimensionar un form se redimensione el tabcontrol que está en AlClient y todo lo que contiene dentro,

con esta opción chapucera me funciona más o menos, pero con algunos problemas con algunos controles:
Partiendo de que el form es de 633x379

Código Delphi [-]
procedure TForm1.FormResize(Sender: TObject);
begin
if form1.Width>633 then tabcontrol1.Scale.X:=form1.Width/633;
if form1.Height>379 then tabcontrol1.Scale.y:=form1.Height/379;
end;
Cual es la forma correcta de que al redimensionar un form se escale todo su contenido?
Un problema que me encuentro es que algunos controles que tienen menús desplegables, este menu no se redimensiona correctamente.
Por ejemplo con los Tcombotrackbar, o los memos que pierden los botones de scrooll

muchas gracias.

Última edición por Casimiro Notevi fecha: 11-11-2013 a las 10:36:36.
Responder Con Cita