El programa Delphi se muestra en pantalla completa sin que la barra de título cubra toda la pantalla (adecuado para salvapantallas)

El programa Delphi se muestra en pantalla completa sin barra de título, cubriendo toda la pantalla. Esto es útil al crear computadoras industriales o protectores de pantalla, así que anótelo.

Copie el código de código de la siguiente manera:

procedimiento TMainFrm.FormCreate(Remitente: TObject);

comenzar

con MainFrm comienza

{Formulario de puesto}

Arriba := 0 ;

Izquierda: = 0;

{Ir a pantalla completa}

Estilo de borde := bsNinguno ;

Estado de la ventana := wsmaximized;

Ancho de cliente: = Ancho de pantalla;

AlturaCliente := Pantalla.Altura;

Refrescar;

Establecer ventana de primer plano (mango);

SetActiveWindow(Aplicación.Manejar);

fin;

fin;