Permettimi di dirti che, salvo esigenze particolari, gli utenti non vedono di buon occhio i cambi impliciti della risoluzione dello schermo (con tutti i problemi che possono comportare nella disposizione delle icone sul desktop, nella barra di avvio, ecc.).
Ad ogni modo, puoi ottenere facilmente la dimensione in pixel dello schermo attraverso l'oggetto Screen, disponibile per ogni applicazione Delphi in ogni unit che utilizza la "Forms.pas"; le proprietà Height e Width restituiscono rispettivamente altezza e larghezza dello schermo.
Ecco un esempio di codice:
Per modificare la risoluzione, il procedimento è più complicato; comunque, puoi trovare un blocco di codice a questo indirizzo:codice:procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(Format('SCREEN Width: %d - Height: %d', [Screen.Width, Screen.Height])); end;
http://www.swissdelphicenter.ch/torr...ode.php?id=158.
Spero di esserti stato d'aiuto.
Ciao!![]()