4.1.1.8.1 PixelsPerInch

PixelsPerInch function

Prototype:	function PixelsPerInch : integer;
Description:	Returns the current resolution of the screen (DPI)
Syntax:	variable := PixelsPerInch;
	Part	Description
	variable	Variable declared as integer

Return value:	DPI of screen

Example:

Var 
  p : integer;

Begin
  p := PixelsPerInch;
  ShowMessage(format ('Current screen resolution is %d DPI.',[p]));
End.