Question

DELPHI中如何打开TEXT中指定路径的文件夹

现在有一个edit,如何用delphi打开在edit.text中指定路径中的文件夹呢

Answer 1

//添加Dialogs->OpenDialog
procedure TForm1.Button1Click(Sender: TObject);
begin
opendialog1.InitialDir:=edit1.Text; //edit1.text:=c:\
opendialog1.Execute;
end;

Answer 2

ShellExecute(Handle,'open', edit1.txt, nil,nil,SW_SHOWNORMAL)

Answer 3

//uses windows;
WinExec(pchar('Explorer.exe '+Edit.Text),SW_SHOWNORMAL);