Código Delphi [-] ShellExecute(Handle, 'open', PChar(Variable), nil, nil, SW_NORMAL);
ShellExecute(Handle, 'open', PChar(Variable), nil, nil, SW_NORMAL);