diegoferxmr,
Cita:
Empezado por diegoferxmr
...no me funciona...if FileExists('{app}\Biable\Biable.xla') then...
|
Te comento:
1- La constante
(app) no puede ser usada directamente,
debe ser expandida por medio de la función
ExpandConstant.
2- La constante
(app) no puede ser usada antes de ser inicializada, en el
Event Functions InitializeSetup,
esta no ha sido inicializada.
3- Te sugiero colocar el archivo de control en otro directorio, por ejemplo:
Código Delphi
[-]
function InitializeSetup(): Boolean;
begin
if FileExists(ExpandConstant('{sys}') + '\' + 'FileControl.txt') then
begin
MsgBox('Setup Cancelado por Existencia de Archivo de Control', mbInformation, MB_OK);
Result := False;
end
else
Result := True;
end;
Buscara el archivo de control en
X:\Windows\System32, donde X será el drive donde este instalado Windows.
Espero sea útil
Nelson.