Hallo,
eine Ansatz kann ich dir geben.
- Header.Options -> hoOwnerDraw auf True
- in der jeweiligen Header-Spalte (Doppelklick auf TreeView
Style auf vsOwnerdraw setzen
Jetzt kannst (musst) du den Header selber malen im OnDrawHeader
Delphi-Quellcode:
procedure TForm1.LV_WorkSteps2HeaderDraw(Sender: TVTHeader;
HeaderCanvas: TCanvas; Column: TVirtualTreeColumn; R: TRect; Hover,
Pressed: Boolean; DropMark: TVTDropMarkMode);
begin
if Column.Position=1 then
begin
HeaderCanvas.Font.Color:= clGreen;
DrawText(HeaderCanvas.Handle, R.Left ??? usw.
end;
end;
Heiko