Ver Mensaje Individual
  #1  
Antiguo 29-01-2007
Avatar de CID
CID CID is offline
Registrado
 
Registrado: abr 2006
Posts: 7
Reputación: 0
CID Va por buen camino
Solo para expertos: FullScreen para ventanas MDI

Sé que parece un tema un tanto simple, se han visto varios posts a lo largo de este foro. Sin embargo las soluciones mostradas no son válidas para ventanas MDI. Me explico.

Entre los posts del foro encontré ésta solución:

Código:
  BorderStyle := bsNone;
  Top := 0;
  Left := 0;
  Height := Screen.Height;
  Width := Screen.Width;
Es válida para formularios SDI, pero no para MDI.

Sin invalidar la solución anterior, para ventanas SDI la mejor forma es la siguiente:

FullScreen para ventanas SDI

Código:
  if BorderStyle <> bsNone then
  begin
    BorderStyle := bsNone;
    WindowState := wsMaximized;
  end
  else
  begin
    WindowState := wsNormal;
    BorderStyle := bsSingle;
  end;
Esta última solución tampoco es válida para formularios MDI.

Luego de analizar el problema me di cuenta que el bug en cuestión aparece al modificar el valor de BorderStyle (para aquellos que no sepan cual es el bug, se lo resumo: las ventanas hijas desaparecen visualmente).

Es por este motivo que recurro a ustedes, esperanzado que alguien haya pasado ya por esta situación y quiera compartir su experiencia (y si la conoce, la solución).

Gracias por leer.
Responder Con Cita