Código Delphi [-] uses SysUtils; begin ShellExecute(ExtractFileDrive(Application.ExeName), 'Open', nil, nil, SW_SHOWNORMAL);
uses SysUtils; begin ShellExecute(ExtractFileDrive(Application.ExeName), 'Open', nil, nil, SW_SHOWNORMAL);