Ver Mensaje Individual
  #3  
Antiguo 25-07-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
De todas formas y volviendo a tu pregunta, si quieres seguir haciéndolo de esa manera deberías de hacer algo como esto:

Código Delphi [-]
procedure TForm1.WMSysCommand;
begin
  inherited;
  if (Msg.CmdType = SC_MAXIMIZE) then
  begin
    Top := 0;
    Left := 0;
    Height := (Screen.Height) - (Screen.Height div 9);
    Width := Screen.Width;
  end;
end;

De esta manera ya podrás maximizar y restaurar sin problemas, aunque si se modifica el tamaño de la ventana manualmente no podrás controlarlo como si lo hace la propiedad MaxHeight.
Responder Con Cita