Virtual Treeview - manueller Zeilenumbruch in Zelle

[micha888]

Hallo,

ich möchte mehrere Strings in einer Zelle darstellen. Jeder String sollte in einer eigenen Zeile stehen.
Versucht habe ich folgende Kombinationen:

Delphi-Quellcode:

procedure TForm1.VirtualStringTree1GetText(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType;
  var CellText: WideString);
begin
  Celltext := tx1 + WideChar(#11) + tx2
end;

procedure TForm1.VirtualStringTree1GetText(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType;
  var CellText: WideString);
begin
  Celltext := tx1 + WideChar(#13) + tx2
end;

procedure TForm1.VirtualStringTree1GetText(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType;
  var CellText: WideString);
begin
  Celltext := tx1 + WideChar(#13) + WideChar(#10) + tx2
end;

Es werden bei allen Varianten immer nur "Quadrätchen dargestellt", ein Zeilenumbruch wird nicht ausgeführt.

Hat jemand eine Idee, wie ich das hinbekomme?

Michael