Buono sconto 4% su Toner e Cartucce agli utenti AZpoint. SU Iomiricarico.it!!
Molti di voi che sono alle prime armi di delphi ci scrivono chiedendoci com'è possibile fare andare a tutto schermo la nostra applicazione delphi ricorrendo ad un semplice script…
Ebbene a questo punto abbiamo deciso di accontentare i nostri visitatori realizzandone un piccolo articolo inerente a questo script, poiché molto spesso è veramente necessario utilizzare la finestra a schermo interno, sia per necessità di spazio che per una questione estetica, come per esempio in un gioco. Qui sotto vi proponiamo le righe di codice, che si dividono principalemente in due pari:
1 - rilevazione della risuolzione attuale in uso
2 - settaggio della finestra a full-screen.
var Schermo: TScreen;
...
SetWindowPos(Handle, HWND_TOP, 0, 0, Schermo.Width, Schermo.Height,
SWP_SHOWWINDOW);
|