Einzelnen Beitrag anzeigen

Karstadt

Registriert seit: 8. Nov 2005
788 Beiträge
 
#9

Re: VirtualStringTree (einen Knoten Name vergeben)

  Alt 13. Feb 2006, 20:35
Delphi-Quellcode:

procedure TForm1.VstGetText(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType;
  var CellText: WideString);
var
  Data: PTreeData;
begin
  Data:=VST.GetNodeData(Node);
  CellText := Data^.FCaption;
end;


procedure TForm1.VstFreeNode(Sender: TBaseVirtualTree; Node: PVirtualNode);
var
  Data: PTreeData;
begin
  Data:=VST.GetNodeData(Node);
  if Assigned(Data) then
    Data.FCaption:='';
end;
Hallo. Ich bin nun soweit, das ich ein Hauptknoten anlegen kann. Jetzt will ich einen Unterknoten enlegen. Ich habe mir zwar den Tutorial angeschaut, leider bin ich nicht viel schlauer geworden.


Mein stand:
Hardware
Software
Autos

Ziel

Hardware->Monitor
Software
Autos->Porsche

Wie kann ich eine unterkategorier ertellen ?
  Mit Zitat antworten Zitat