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

[Cássio]

oi. no código abaixo tem como eu colocar uma msg de feedback ao usuário: 
  tipo "Instalando acessórios... aguarde..."

vlw.


[Code]
var
	Path : String;
	ErrorCode : Integer;

procedure CurStepChanged(CurStep: TSetupStep);
begin
   if CurStep = ssDone then begin
	Path := 'Caminho para seu arquivo.MSI';
	ShellExec('open', Path, '', '', SW_HIDE, ewNoWait, ErrorCode);
   end;
end;