Ordner öffnen und in edit schreiben

[NeMesis44]

Hallo :-D mir is die Frage ein bisschen :oops:

Ich wähle also den Ordner auf mit folgenden Code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Pfad: string;
begin
  SelectDirectory('Ordner auswählen', '' ,Pfad);
end;

Nur wenn ich dann den Ordner auswähle passiert nix im Edit(is ja auch klar)!Aber wie geht das wenn ich nen Ordner auswähle dann automatisch im edit1 erscheint wo der Ordner "pfad" ist :gruebel:

mit Edit1.text:=Pfad; gehts auch net :P

Sorry wenn das bisschen komisch daoben klingt nur bin ich grad ögentwie komisch im kopf :drunken:

MFG
Nemesis44

[Luckie]

Delphi-Quellcode:

uses
  FileCtrl;

procedure TForm1.Button1Click(Sender: TObject);
var Pfad: string;
begin
  SelectDirectory('Ordner auswählen', '' ,Pfad);
  Edit1.Text := Pfad;
end;

Geht.

[NeMesis44]

:shock: Jetzt gehts unglaublich :lol: