[Amin_Mansouri]

english:ScreenResolutionReturns the current screen resolution in a TSize record whose cx and cy fields give the screen width and height respectively.
Required units: Windows, Types.
با سورس زیر که با دلفی نوشته شده است میتونید رزولیشن صفحه نمایشتون رو بدست بیارید.
کد: 

کد:

function ScreenResolution: Types.TSize;
var
  DC: Windows.HDC;
begin
  DC := Windows.GetDC(Windows.HWND_DESKTOP);
  try
    Result.cx := Windows.GetDeviceCaps(DC, Windows.HORZRES);
    Result.cy := Windows.GetDeviceCaps(DC, Windows.VERTRES);
  finally
    Windows.ReleaseDC(0, DC);
  end;
end;