E2095 $ENDIF 指令が見つかりません (Delphi)

提供: RAD Studio
移動先: 案内検索

エラーと警告のメッセージ(Delphi) への移動

このエラーメッセージは $IFDEF,$IFNDEF,$IFOPT のいずれかの指令の後に対応する $ENDIF 指令がない場合に表示されます。


program Produce;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compiled with optimizations');
(*$Else*)
  Writeln('Compiled without optimizations');
(*Endif*)
end.                                           (*<-- ここでエラーメッセージ*)

{ このコードでは,(*$Endif*) 指令の中に $ 文字を入れ忘れたため,コンパイラが指令をコメントと誤解した }


program Solve;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compiled with optimizations');
(*$Else*)
  Writeln('Compiled without optimizations');
(*$Endif*)
end.

{ 有効な $ENDIF 指令を条件指令の後に付けると解決する }