MSIEXEC DELPHI DX, erro

Delphi

CRUD - Delphi

27/05/2019

Ola,

Estou com seguinte problema, porém no meu nível e difícil.

seguinte, estou fazendo a baixa e instalação de um drive de um link especifico, no meu caso consigo executar manualmente e pelo cmd usando msiexec, porém quando eu uso no Delphi em procedure não consigo.

*certifiquei se o arquivo existe.
*consigo executar e instalar usando o mouse.
*usando msiexec manualmente o cmd ok
*o arquivo esta na extensão .msi


porém quando chamo essa função abaixa consigo entrar na condição, no entanto quando e executado o comando, apresentar a seguinte mensagem

'Este pacote de instalação não pode ser aberto. verifique se o pacote exite e se você pode acessa-lo ou entre em contato com o o fornecedor do aplicativo para verificar se este é um pacote valido do Windows Installer.'

procedure TFormPrincipal.eInstalaDrive(Nome: string);
begin
if Nome = 'safenet-pro72k-x64.msi' then
begin
ShowMessage('intalando aqui: '+Nome);
// WinExec('msiexec /i c:\\soluti\\safenet-pro72k-x64.msi',SW_SHOW);// foi usado essa forma sem exito por aqui
WinExec('cmd /C msiexec /i c:\\soluti\\SafeNet-Aladin(x64).msi',SW_SHOW);// esse aqui tbm sem exito.
end
else
.
.
.
Alguém consegue me auxiliar nesse caso. obrigado.
Brenno Lima

Brenno Lima

Curtidas 0
POSTAR