[VST] Zeilenumbruch in Nodes

[phXql]

bin ich zu blöd dafür?? hab mir die demo angeschaut, und das nun so gemacht:

Beim hinzufügen eines Nodes:

Delphi-Quellcode:

    t_child := VST1.AddChild(t_node);
    VST1.MultiLine[t_child] := True;
    t_data := VST1.GetNodeData(t_child);
    t_data^.ExceptionObj := g_Exceptions.Exception[i];
    t_data^.Kind := tkMessage;

Dann bei GetText:

Delphi-Quellcode:

procedure TFormExceptionLog.VST1GetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType; var CellText: WideString);
var
  t_data: PTreeNodeData;
begin
  t_data := Sender.GetNodeData(Node);
  case t_data^.Kind of
    tkMessage: CellText := 'Zeile 1' + #13#10 + 'Zeile 2';
  end;

Und dann noch um automatisch die richtige Höhe anzeigen zu lassen:

Delphi-Quellcode:

procedure TFormExceptionLog.VST1MeasureItem(Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode; var NodeHeight: Integer);
begin
  if Sender.MultiLine[Node] then
    NodeHeight := VST1.ComputeNodeHeight(TargetCanvas, Node, -1);
end;

Nun SOLLTE es ja eigentlich gehen. also die spalte schaut mehrzeilig aus, nur leider wird der Text als "Zeile 1[dann die zwei kastel]Zeile 2" dargstellt. Wo is der Fehler??

mfg phXql