Set Inno Setup installer version based on an online file

user_6275155 0
Viewed 139

In my Inno Setup project, I download all files from the server and also download a file that has a version number. Now I want to read the version from the file and assign it to [Setup] section AppVersion in the Code section. My question is that possible to set the app version in the Code section?

pascalscript inno-setup
1 Answers

Combining these two questions:

[Setup]
AppVersion={code:GetAppVersion}

[Code]
var
  Version: string;

function GetAppVersion(Param: string): string;
var
  WinHttpReq: Variant;
begin
  if Version = '' then
  begin
    WinHttpReq := CreateOleObject('WinHttp.WinHttpRequest.5.1');
    WinHttpReq.Open('GET', 'https://www.example.com/version.txt', False);
    WinHttpReq.Send('');
    if WinHttpReq.Status <> 200 then
    begin
      Log('HTTP Error: ' + IntToStr(WinHttpReq.Status) + ' ' + WinHttpReq.StatusText);
      MsgBox('Cannot obtain version', mbError, MB_OK);
      Abort();
    end
      else
    begin
      Version := Trim(WinHttpReq.ResponseText);
      Log('Version: ' + Version);
      // you may want to validate that the value is meaningful here
    end;
  end;
  Result := Version;
end;
user_8508480
Related