1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

procedure Machet(handle: HWND);
var
  wndInfo: TWindowInfo;
begin
  wndInfo.cbSize := sizeOf(TWindowInfo); 
  { die cbSize gibt hier keine Größe an, die irgendwas mit dem Fenster zu tun hat, sondern ist notwendig für
    die Methode and die du die wndInfo übergibts.
    Du schreibst dort also rein, wie groß das Record in Bytes ist. }
  if GetWindowInfo(handle, wndInfo) then
  begin
    MachIrgendwas;
  end;
end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

procedure Machet(handle: HWND);
var
  wndRect: TRect;
begin
  {Das lpRect ist in dem Sinne kein Pointer. Delphi deklariert das ganze als Var parameter.
   Also ein Übergabewert, der in der aufgerufenen nur Referenziert wird. Sprich Wenn GetWindowRect etwas
   in dem Übergabewert wndRect verändert, ist das wndRect danach in der Methode Machet auch verändert}
  if GetWindowRect(handle, wndRect) then
  begin
    MachWas;
  ShowMessage(format('Left: %d; Right: %d; Top: %d, Bottom: %d', 
                     [wndRect.Left, wndRect.Right, wndRect.Top, wndRect.Bottom]));
  end;
end;