Ir al contenido



Foto

[TRUCO DELPHI] Hacer tu Aplicacion pantalla completa.


  • Por favor identifícate para responder
4 respuestas en este tema

#1 sir.dev.a.lot

sir.dev.a.lot

    Advanced Member

  • Miembros
  • PipPipPip
  • 545 mensajes
  • Location127.0.0.1

Escrito 31 agosto 2016 - 12:42

[TRUCO DELPHI] Hacer tu Aplicacion pantalla completa.


delphi
  1. procedure TSomeForm.FormShow(Sender: TObject);
  2. var
  3. r : TRect;
  4. begin
  5. Borderstyle := bsNone;
  6. SystemParametersInfo
  7. (SPI_GETWORKAREA, 0, @r,0);
  8. SetBounds
  9. (r.Left, r.Top, r.Right-r.Left, r.Bottom-r.Top);
  10. end;

Saludos!


  • 3

#2 escafandra

escafandra

    Advanced Member

  • Moderadores
  • PipPipPip
  • 3.831 mensajes
  • LocationMadrid - España

Escrito 18 enero 2017 - 05:50

[TRUCO DELPHI] Hacer tu Aplicacion pantalla completa.


delphi
  1. procedure TSomeForm.FormShow(Sender: TObject);
  2. var
  3. r : TRect;
  4. begin
  5. Borderstyle := bsNone;
  6. SystemParametersInfo
  7. (SPI_GETWORKAREA, 0, @r,0);
  8. SetBounds
  9. (r.Left, r.Top, r.Right-r.Left, r.Bottom-r.Top);
  10. end;

Saludos!

El código que expones no pone la aplicación en pantalla completa, sencillamente genera una excepción.

El siguiente código sí pone la aplicación ocupando toda la pantalla

delphi
  1. procedure TForm1.FormCreate(Sender: TObject);
  2. var
  3. r: TRect;
  4. begin
  5. SystemParametersInfo(SPI_GETWORKAREA, 0, @r, 0);
  6. SetBounds(r.Left, r.Top, r.Right - r.Left, r.Bottom - r.Top);
  7. end;


Saludos.
  • 1

#3 sir.dev.a.lot

sir.dev.a.lot

    Advanced Member

  • Miembros
  • PipPipPip
  • 545 mensajes
  • Location127.0.0.1

Escrito 18 enero 2017 - 06:33

En cual Delphi hizo la prueba ?

 

Saludos!


  • 0

#4 escafandra

escafandra

    Advanced Member

  • Moderadores
  • PipPipPip
  • 3.831 mensajes
  • LocationMadrid - España

Escrito 20 enero 2017 - 05:08

En cual Delphi hizo la prueba ?
 
Saludos!


Ese es el problema, el evento OnShow no es una buena idea para realizar cambios en la visualización porque puede generar excepciones y no es compatible entre versiones, además el código se repite una y otra vez.

Saludos.
  • 0

#5 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 13.936 mensajes
  • LocationMéxico

Escrito 20 enero 2017 - 12:40

Ese es el problema, el evento OnShow no es una buena idea para realizar cambios en la visualización porque puede generar excepciones y no es compatible entre versiones, además el código se repite una y otra vez.

Saludos.

 

Claro, al estar en el evento onShow se hace un bucle infinito.

 

Saludos


  • 0