Código Delphi [-]uses ShellApi; procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', nil, nil, 'C:\WINNT\', SW_SHOW); end;
uses ShellApi; procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', nil, nil, 'C:\WINNT\', SW_SHOW); end;