Hi Reedemer
Das hier war dein Beispiel aus Beitrag #10 (um die auskommentierten Zeilen gekürzt):
Delphi-Quellcode:
procedure TForm1.uwas1Click(Sender: TObject);
var
Node: TTreeNode;
begin
begin
Node := TVFilesExplorer.Items.AddChild(FPopUpNode, 'Neu');
FPopupNode.Expand(True); // <=== Die von dir eingefügte Zeile
Node.ImageIndex := 3;
Node.SelectedIndex := 3;
Node.EditText;
end
end;
Mit der von dir eingefügten Zeile wird der Knoten aufgeklappt. Ob das nun wirklich so war oder nicht; der Knoten schien nicht da zu sein - aber er war es definitiv, nachdem ich ihn erst zu- und dann wieder aufgeklappt hatte.
Im Moment allerdings steht mir Delphi nicht wirklich zur Verfügung, da ich den Debugmodus nicht starten kann; Kaspersky hat mir die von Delphi erstellte EXE als Virus eingestuft und hindert Delphi daran, eine neue zu erstellen. Und wie ich dem Kerl nun beibringe, dass er das gefälligst lassen soll, hab ich noch nicht mit letzter Sicherheit herausgefunden.
Gruss
Delbor