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