Mega Code Archive

 
Categories / Delphi / Examples
 

Quick way to retrieve current screen resolution

Why use the Windows API when you can retrieve the current screen resolution using two simple variables? Screen.Width Screen.Height Above variables will automatically get updated if the screen resolution were to change while the application is running. MessageDlg( 'screen width = ' + IntToStr( Screen.Width ) + ', screen height = ' + IntToStr( Screen.Height ), mtInformation, [mbOk], 0 );