Código Delphi [-]ShellExecute(Handle,'Open','.',nil,nil,SW_SHOWNORMAL);
ShellExecute(Handle,'Open','.',nil,nil,SW_SHOWNORMAL);