Как получить высоту заголовка столбца TListView?

Question

В TListView я хочу получить первый пиксель по вертикали, где начинается клиентская область списка.Обычно он начинается с 0, но когда заголовок присутствует, он начинается с высоты заголовка.

Answer 1

Получить дескриптор заголовка (альтернатива - с соответствующим сообщением LVM_GETHEADER) и получить его размер любым способом.

uses ... commctrl;

var
  h: THandle;
  r: TRect;
begin
  h := ListView_GetHeader(ListView2.Handle);
  GetWindowRect(h, r);
  Caption := IntToStr(r.Bottom - r.Top);