[firebase-br] dúvida num code do inno setup

Cássio cassio.hc em gmail.com
Sex Jan 23 20:31:42 -03 2009


o primeiro código funcionou!!!
tem como eu colocar uma parametro para executar silencioso?
tentei colocar antes do /i o /silent, mas não rola... tem ideia?


vlw


Cássio escreveu:
> certo, mas este "msiexec.exe" eu tenho que criá-lo, porque não está 
> funcionando aqui... vlw,
> 
> ricardo zancanaro escreveu:
>> Boa tarde Cassio,
>>
>> na página http://www.innosetup.com/iskb.php?msi , tem a seguinte dica
>> de como instalar .MSI.
>>
>>
>> [Files]
>> Source: "Your-MSI-File.msi"; DestDir: "{tmp}"
>>
>> [Run]
>> Filename: "msiexec.exe"; Parameters: "/i ""{tmp}\Your-MSI-File.msi"""
>>
>> Em um teste que fiz aqui, o instalador chama o .MSI e fica aguardando
>> o término da execução do mesmo.
>>
>> Mas se quiser tentar, tem essa gambiarra aqui, ele cria uma nova
>> página no seu instalador chama teu .MSI e cria uma barra de progresso
>> só pra tapear, não testei, mas acredito que tenha como vc trocar o for
>> por um while e executar a barra até o final da execução do .MSI
>>
>> var
>>     BarraProgresso: TOutputProgressWizardPage;
>>     PaginaProgresso : TWizardPage;
>>
>> procedure criarWizard();
>> var
>>     Paginas: TWizardPage;
>> begin
>>     PaginaProgresso := CreateOutputMsgMemoPage(wpInfoAfter, 'Título 
>> Janela',
>>         'Descrição das ações',
>>         'Ações:',
>>         'Atividade'#13'Atividade');
>>     Paginas := CreateCustomPage(wpFinished, 'wpFinished', 'Descrição do
>> meu wizard');
>> end;
>> procedure InitializeWizard();
>> begin
>>     criarWizard();
>> end;
>>
>> function NextButtonClick(CurPageID: Integer): Boolean;
>> var
>>     I: Integer;
>>     ErrorCode: Integer;
>>     Path: String;
>> begin
>>     if CurPageID = PaginaProgresso.ID then begin
>>         BarraProgresso := CreateOutputProgressPage('Iniciar Serviço','');
>>         BarraProgresso.SetText('Iniciando Firebird...', '');
>>         BarraProgresso.SetProgress(0, 0);
>>         BarraProgresso.Show;
>>         try
>>
>>             Path := '"' + ExpandConstant('{tmp}\SeuArquivo.MSI"');
>>             ShellExec('open', Path, '', '', SW_HIDE, ewNoWait, 
>> ErrorCode);
>>
>>             for I := 0 to 100 do begin
>>                 BarraProgresso.SetProgress(I, 100);
>>                 Sleep(100);
>>             end;
>>         finally
>>             BarraProgresso.Hide;
>>             if ErrorCode <> 0 then
>>                 MsgBox('Erro ao executar o .MSI.', mbInformation, MB_OK);
>>             Result := True;
>>         end;
>>     end
>>     else
>>         Result := True;
>> end;
>>
>> Att,
>> Ricardo Zancanaro
>>
>> ______________________________________________
>> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
>> Para saber como gerenciar/excluir seu cadastro na lista, use: 
>> http://www.firebase.com.br/fb/artigo.php?id=1107
>> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>>
> 
> 
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use: 
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> 





Mais detalhes sobre a lista de discussão lista