Inno-Setup Semicolon fehlt

Question

Ich habe die folgende Funktion, die zu einem "Semikolon fehlt." Fehler“, aber ich sehe nicht, warum.

Vielen Dank für die Hilfe!

function PrepareToInstall(var NeedsRestart: Boolean): String; 
begin 
    if not IsServiceRunning('oscmaintenanceserver') then 
     begin 
      MsgBox('Service not running. Exit.', mbInformation, MB_OK); 
      exit; 
     end 
    end 
    if not StopService('oscmaintenanceserver') then 
     begin 
      MsgBox('Service couldnt be stopped.', mbInformation, MB_OK); 
      exit; 
     end 
    end 
    if not RemoveService('oscmaintenanceserver') then 
     begin 
      MsgBox('Couldnt remove service.', mbInformation, MB_OK); 
      exit; 
     end 
    end 
    begin 
     MsgBox('All went fine :-).', mbInformation, MB_OK); 
     exit; 
    end 
end; 

Answer 1

Sie haben eine extra end in jedem if Zweig bekommen. Außerdem, wenn ein Ende einer Anweisung Kennzeichnung, ein end erfordert ein Semikolon, nachdem es

function PrepareToInstall(var NeedsRestart: Boolean): String; 
begin 
    if not IsServiceRunning('oscmaintenanceserver') then 
     begin 
      MsgBox('Service not running. Exit.', mbInformation, MB_OK); 
      exit; 
     end; 
    if not StopService('oscmaintenanceserver') then 
    ...