[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