Fix typos in Compile.pas

Projects/Compile.pas

@@ -8569,7 +8569,7 @@ begin
     LineNumber := SetupDirectiveLines[ssAppName];
     AppNameHasConsts := CheckConst(SetupHeader.AppName, SetupHeader.MinVersion, []);
     if AppNameHasConsts and not(shDisableStartupPrompt in SetupHeader.Options) then begin
-      { AppName has contants so DisableStartupPrompt must be used }
+      { AppName has constants so DisableStartupPrompt must be used }
       LineNumber := SetupDirectiveLines[ssDisableStartupPrompt];
       AbortCompile(SCompilerMustUseDisableStartupPrompt);
     end;
@@ -8579,7 +8579,7 @@ begin
       LineNumber := SetupDirectiveLines[ssAppId];
     AppIdHasConsts := CheckConst(SetupHeader.AppId, SetupHeader.MinVersion, []);
     if AppIdHasConsts and (shUsePreviousLanguage in SetupHeader.Options) then begin
-      { AppId has contants so UsePreviousLanguage must not be used }
+      { AppId has constants so UsePreviousLanguage must not be used }
       LineNumber := SetupDirectiveLines[ssUsePreviousLanguage];
       AbortCompile(SCompilerMustNotUsePreviousLanguage);
     end;