Registriert seit: 7. Jun 2002
Ort: Kirchheim unter Teck
1.036 Beiträge
Delphi 7 Personal
|
Re: Ordner angeben
14. Jul 2003, 16:05
Delphi-Quellcode:
procedure TForm1.Frame21SpeedButton2Click(Sender: TObject);
var
Dir: String;
begin
SelectDirectory('Select a directory', '', Dir);
ShowMessage(Dir);
Edit2.text:=Dir;
end;
so sollte es gehen.
Roman Keller Krieg ist Gottes Art den Amerikanern Geographie beizubringen!
|