Estilo de WIN XP vs Delphi

[amadis]

Lo he agregado y he probado varias cosas antes de postear en el foro pero no resultó.

Desde el principio sin XPmanifiest tuve el problema ese con el XPman lo mismo.

Luego probando con unos parametros del XPman pero nada resulta.

Cuando el XP esta en vista clasica se ve todo bien pero cuando se pone el XP en vista MODERNA aparece ese defasaje con la barra de estados y la barra de titulo.

Les agradeceria si al menos alguien me dice que con sus programas ha pasado lo mismo.

Y volviendo al XP manifiest. sin haberlo puesto al XP maniifiest ejecutando el programa en un XP con estilo moderno se ve todo con el estilo nuevo de XP.

Así que no entiendo como funciona!

Desde ya gracias y saludos

[[Lepe]]

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