Ver Mensaje Individual
  #4  
Antiguo 16-06-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Los síntomas son clásicos de una ventana MDI cuando la vas a maximizar, que no toma el tamaño correcto del escritorio. Ya ha salido en los foros, y la respuesta es esta:

Código Delphi [-]
procedure TFrmMdi.ApplicationEvents1SettingChange(Sender: TObject;
  Flag: Integer; const Section: String; var Result: Integer);
var
  R: TRect;
begin
  // para arreglar el maximimizar de la ventana
  // cuando esta maximizada y se cambia la barra  de tareas de sitio.
  if (flag = SPI_SETWORKAREA) and (frmmdi.WindowState = wsmaximized) then
  begin
    SystemParametersInfo(SPI_GETWORKAREA, 0, @R, 0);
    SetBounds(R.Left, R.Top, R.Right - R.Left, R.Bottom - R.Top);
    Result := 0;
  end;

end;

Como puedes apreciar, necesitas un Applications Events, y usar el evento Settings Changing.

Un saludo
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita