La verdad es que ando perdido cual pulpo en garaje. Ya dije que no me manejo muy bien con InnoSetup. Aun así, voy a ver si explicando qué es una variable global (que parece que es tu duda) lo arreglo.
Una variable global es una que existe durante todo el tiempo de ejecución del programa y es accesible desde cualquier parte del mismo, como contrapartida de una variable local que sólo existe en el tiempo de ejecución de una función o procedimiento y sólo puede accederse desde dicha función. Por ejemplo:
Código Delphi
[-]
PROGRAM Ejemplo;
VAR
VariableGlobal: INTEGER;
PROCEDURE Procedimiento;
VAR
VariableLocal: INTEGER;
BEGIN
...
VariableGlobal := VariableLocal;
END;
PROCEDURE OtroProcedimiento;
VAR
VariableLocal: INTEGER;
BEGIN
...
VariableGlobal := VariableLocal;
END;
END.
En el caso que nos ocupa, necesitas una variable global puesto que las partes se ejecutan paralelamente (es decir, se ejecutan al mismo tiempo, o eso he entendido a partir de tu explicación). Básicamente lo haría así:
Código Delphi
[-]
....
CONST
NUM_PASOS := 5;
VAR
NumPasoActual: INTEGER;
PROCEDURE MuestraBarra;
BEGIN
ProgressPage := CreateOutputProgressPage('My App','');
ProgressPage.SetText('Starting installation...', '');
ProgressPage.Show;
try
REPEAT
ProgressPage.SetProgress(NumPasoActual, NUM_PASOS);
Sleep(100);
UNTIL NumPasoActual > NUM_PASOS;
finally
ProgressPage.Hide;
ProgressPage.Free;
end;
END;
PROCEDURE Instalar;
BEGIN
NumPasoActual := 1;
HacePasoUno (Parametro1, OtroParametro);
INC (NumPasoActual)
HacePasoDos (Parametro1, OtroParametro);
INC (NumPasoActual)
HacePasoTres (Parametro1, OtroParametro);
INC (NumPasoActual)
OtroPaso (Parametro1, OtroParametro);
INC (NumPasoActual)
UltimoPaso (Parametro1, OtroParametro);
NumPasoActual := NUM_PASOS + 1;
END;