Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: TShellTreeView mit Ordnergrößen

    Delphi
    by Flogo, 16. Aug 2003
  Ok Ich bin ein Stück weiter gekommen aber es hakt immer noch
  function TForm1.getNodeSize(Node: TTreeNode): Int64;
  var TempNode: TTreeNode;
  Path: String;
  OldIndex, i: Integer;
  begin
  Result := 0;
  if Node.HasChildren then
  begin
  TempNode := Node.GetFirstChild;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  TShellTreeView mit Ordnergrößen

    Delphi
    by Flogo, 12. Aug 2003
  Ich würde gerne in ein ShellTreeView zu jedem Ordner die Ordnergöße als Node.Data dazuspeichern und komme dabei nicht weiter
  function TForm1.getNodeSize(Node: TTreeNode): Int64;
  begin
  if Node.HasChildren then
  begin
  Size := Size + getNodeSize(); //von allen Child-Nodes???
  end
  else
  begin
  Node.Data := DirSize(Node.Text); //soll später die Größe des Ordners auf unterster...