Thema: Delphi TreeView - Explorer

Einzelnen Beitrag anzeigen

Nils_13

Registriert seit: 15. Nov 2004
2.647 Beiträge
 
#1

TreeView - Explorer

  Alt 3. Dez 2004, 15:53
Hi,

Delphi-Quellcode:
procedure FindDublicateNode(const ATreeView: TTreeView; const S: String);
var
  I: Integer;
begin
  with ATreeView do begin
    for I := 0 to Items.Count - 1 do begin
      if Items[I].Text = S then begin
        ShowMessage(S + ' existiert schon!');
        Exit;
      end;
    end;
  end;
end;
Damit sollte man einen neuen TreeView Node erstellen, nur wie zeige ich die alle Dateien oder Ordner, die sich auf der Festplatte befinden an?

  Mit Zitat antworten Zitat