Einzelnen Beitrag anzeigen

ernschd

Registriert seit: 16. Jan 2008
166 Beiträge
 
Delphi XE8 Professional
 
#1

Zwei VirtualTreeView mit gleicher Datenquelle

  Alt 16. Jun 2014, 12:27
Hi,

ich wollte in einer Software zwei VirtualTreeView verwenden, die auf die gleichen Daten zugreifen.
Ein TreeView soll wie beim Windows-Explorer eine Navigations-Baumstruktur anzeigen, der andere eine Tabelle.

Nun Frage ich mich, wie ich die Daten zuordnen kann.
Hat jemand so etwas schon mal gemacht?

Mein erster Versuch wäre ungefähr so:
Delphi-Quellcode:
procedure TForm1.createNodes(Sender: TObject);
var Node, NNode: PVirtualNode;
    i : integer;
    Data, DestData: PTreeData;
begin
    VSTBaum.NodeDataSize := SizeOf(TTreeData);
    VST.NodeDataSize := SizeOf(TTreeData);
    for I := 0 to 49 do begin
        Node := VST.AddChild(nil);
        Data := VST.GetNodeData(Node);
        Data^.FCaption := 'Hallo '+IntToStr(I);
        Data^.FColumn1 := 'Weiterer Wert '+IntToStr(I);
        NNode := VSTBaum.AddChild(nil);
        DestData := VSTBaum.GetNodeData(NNode);
        CopyMemory(DestData, DAta, SizeOf(Data));
    end;
end;
Finde ich aber nicht besonders schön. Kann ich nicht was mit VST.CopyTo machen?
  Mit Zitat antworten Zitat