E2095: Directive ENDIF manquante (Delphi)

Remonter à Messages d'erreur et d'avertissement (Delphi) - Index

Ce message d'erreur est émis si le compilateur ne trouve pas de directive $ENDIF correspondante après une directive $IFDEF, $IFNDEF ou $IFOPT.

program Produce;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compilé avec les optimisations');
(*$Else*)
  Writeln('Compilé sans les optimisations');
(*Endif*)
end.                                           (*<-- Message d'erreur ici*)

Dans cet exemple, nous avons laissé le caractère $ dans la directive (*$Endif*), ainsi le compilateur l'a pris pour un commentaire.

program Solve;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compilé avec les optimisations');
(*$Else*)
  Writeln('Compilé sans les optimisations');
(*$Endif*)
end.

La solution consiste à s'assurer que toutes les directives conditionnelles ont une directive $ENDIF correcte.