...change the TreeView item height?

Author: Simon Grossenbacher
Homepage: http://www.swissdelphicenter.ch

Category: VCL

{ .... }

uses CommCtrl;

{ .... }

procedure SetTreeViewItemHeight(aTreeView: TTreeView; aItemHeight: Word);
begin
  
aTreeView.Perform(TVM_SETITEMHEIGHT, aItemHeight, 0);
end;


// Example:
procedure TForm1.Button1Click(Sender: TObject);
begin
  
SetTreeViewItemHeight(TreeView1, 30);
end;

 

printed from
www.swissdelphicenter.ch
developers knowledge base