Главная страница | назад





Article #17567: Getting the size of the desktop.

 Question and Answer Database

FAQ2567D.txt   Getting the size of the desktop.
Category   :Windows API
Platform    :All
Product    :All 32 bit  

Question:
How do I find the size of the Desktop minus the taskbar?


Answer:
Call the Windows API function SystemParametersInfo() passing
the SPI_GETWORKAREA parameter along with the address of the rectangle
structure to receive the coordinates.

Example:

procedure TForm1.Button1Click(Sender: TObject);
var
  r : TRect;
begin
  SystemParametersInfo(SPI_GETWORKAREA,
                       0,
                       @r,
                       0);
  Memo1.Lines.Add(IntToStr(r.Top));
  Memo1.Lines.Add(IntToStr(r.Left));
  Memo1.Lines.Add(IntToStr(r.Bottom));
  Memo1.Lines.Add(IntToStr(r.Right));
end;

7/16/98 4:31:28 PM
 

Last Modified: 01-SEP-99