Inno Setup und Pascal

[Yoghurt]

Folgenden Code in das Setup Script einfügen...

[code]

function InitializeSetup(): Boolean;
begin
  Result := FileExists('C:\Programme\SPHINKS\SPHINKS.EXE');
  if Result = False then
    MsgBox('Script.InitializeSetup:' #13#13 'Kein SPRINKS gefunden.',
            mbInformation, MB_OK);
end;

Falls du den Installationspfad aus der Registry auslesen musst...

[code]

function InitializeSetup(): Boolean;
var
  FilePath : String;
begin
  FilePath := '';
  Result := RegQueryStringValue(HKLM,'Software\Dein Firma\SPHRINKS',
             'InstallPath', FilePath);
  Result := FileExists(FilePath + 'SPHINKS.EXE');
  if Result = False then
    MsgBox('Script.InitializeSetup:' #13#13 'Kein SPRINKS gefunden.',
            mbInformation, MB_OK);
end;

Sollte funktionieren, bin aber leider nicht zum Testen gekommen. Also wenn was nicht geht, melden, dann schau ichs mir nochmal durch und schick dir ein fertiges Script.