Как через WinApi узнать размеры окна?

При обработке сообщения WM_SIZE:

  size_x := LOWORD(Lparam); 
  size_y := HIWORD(Lparam);

А также из любого места программы:

function GetWindowRect(hWnd: HWND; var lpRect: TRect): BOOL; stdcall;
...
Implementation
...
function GetWindowRect; external user32 name 'GetWindowRect';

Передаешь туда hWnd окна И переменную

var lpRect: TRect

и считываешь координаты и размеры:

X := lpRect.Left;
Y := lpRect.Top;
Ширина := lpRect.Right - lpRect.Left;
Высота := lpRect.Bottom - lpRect.Top;

Всё просто...