Personalizar TVirtualStringTree

[Casimiro Notevi]

En el GetImageIndex puedes indicar qué imagen poner, supongo que podrás asignarle "null", o una en blanco.

Código Delphi [-]
procedure TFcuentas.vstArbolGetImageIndex(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Kind: TVTImageKind; Column: TColumnIndex;
  var Ghosted: Boolean; var ImageIndex: Integer);
var
  pRec : ^TRecBase;
  iNivel : Integer;
begin
  inherited;
  if iMaxDigitos=0 then
    Exit;
  if Column=0 then
  begin
    pRec := Sender.GetNodeData(Node);
    iNivel := pRec.Nivel;
    if iNivel=1 then
      ImageIndex := 0
    else
    if (iNivel>1) and (iNivel < iMaxDigitos) then
      ImageIndex := 1
    else
    if iNivel=iMaxDigitos then
      ImageIndex := 2;
  end;
end;