Jump to content


Photo

[TRUCO DELPHI] Hacer tu Aplicacion pantalla completa.


  • Please log in to reply
4 replies to this topic

#1 sir.dev.a.lot

sir.dev.a.lot

    Advanced Member

  • Miembros
  • PipPipPip
  • 545 posts
  • Location127.0.0.1

Posted 31 August 2016 - 12:42 PM

[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

  • Administrador
  • 4107 posts
  • LocationMadrid - España

Posted 18 January 2017 - 05:50 PM

[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 posts
  • Location127.0.0.1

Posted 18 January 2017 - 06:33 PM

En cual Delphi hizo la prueba ?

 

Saludos!


  • 0

#4 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4107 posts
  • LocationMadrid - España

Posted 20 January 2017 - 05:08 AM

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
  • 14448 posts
  • LocationMéxico

Posted 20 January 2017 - 12:40 PM

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




IP.Board spam blocked by CleanTalk.