ListView ItemHeight

[EWeiss]

Zitat von TiGü:

Willst du das vorher wissen und selber die Höhe errechnen und die Itemhöhe setzen oder interessiert dich die Höhe des Items nach dem Ändern der Schrift?
Bei letzteren erhälst du die Höhe des Items über das TRect prc:

Delphi-Quellcode:

function ListView_GetItemRect(hWnd: HWND; i: Integer; var prc: TRect;
  Code: Integer): Bool;
begin
  if @prc <> nil then
  begin
    prc.left := Code;
    Result := Bool(SendMessage(hWnd, LVM_GETITEMRECT, i, LPARAM(@prc)));
  end
  else
    Result := Bool(SendMessage(hWnd, LVM_GETITEMRECT, i, 0));
end;

Ahh Danke dann kann ich mir den GDI+ Kram sparen.

Delphi-Quellcode:

  if FItemHeight = 0 then
  begin
    ListView_GetItemRect(hListView, nItem, rc, LVIR_LABEL);
    FItemHeight := rc.Bottom - rc.top;
  end;

gruss