Как через 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';
var lpRect: TRectи считываешь координаты и размеры:
X := lpRect.Left;
Y := lpRect.Top;
Ширина := lpRect.Right - lpRect.Left;
Высота := lpRect.Bottom - lpRect.Top;