Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by ernschd,
16. Aug 2011
Hmm, wenn ich das so versuche, werden seltsamerweise die Nodes 1-5 nicht angezeigt, alle anderen schon. GetText gibt nur die Daten aus.
procedure zeigeNode(Index: Integer);
var Node : PVirtualNode;
begin
Node := VST.GetFirst();
while (Node.Index <> Index) do begin
VST.IsVisible := False;
Node := VST.GetNext(Node);
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by ernschd,
15. Aug 2011
Vielleicht sollte ich mal etwas genauer erklären, was ich vorhabe: ich möchte den Anwender meines Programms die Daten des Trees durchblättern lassen, wobei jeweils immer nur das aktive Parent (sichtbar) sein.
Ich möchte also nur ein Parent inkl. seiner Child-Elemente anzeigen.
Da mein Tree aber logischerweise mehrere Parent-Elemente enthält, dachte ich, dass ich die ungewollten in GetText...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by ernschd,
15. Aug 2011
Ich habe es vorerst mal so gelöst (in diesem Fall zur Anzeige des Child-Elements von Parent3):
procedure TForm1.VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode;
Column: TColumnIndex; TextType: TVSTTextType; var CellText: WideString);
var Data : PTData;
fChild: PVirtualNode;
a, i : Integer;
begin
a := Node.Index;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by ernschd,
11. Aug 2011
Hi,
ich habe mein VST mit Daten gefüllt, so dass die Struktur ungefähr so aussieht:
- Parent0
|_ Child
|_ Child
- Parent1
|_ Child