E2015: この型には指定した演算子は使用できません (Delphi)

エラーと警告のメッセージ （Delphi）：インデックス への移動

このエラーメッセージはオペランドへ指定した演算子がそのオペランドには適用できない場合，たとえばポインタへ論理演算子を適用した場合などに表示されます。

program Produce;
var
  P: ^Integer;
begin
  if P and P^ > 0 then
    Writeln('P points to a number greater 0');
end.

{ このコードは Delphi の演算子の優先順位を把握していない C++ プログラマの書いたコード。P は論理式ではなく，比較はかっこで囲む必要がある }

program Solve;
var
  P: ^Integer;
begin
  if (P <> nil) and (P^ > 0) then
    Writeln('P points to a number greater 0');
end.

{ P と nil を明示的に比較し，かっこで囲めばよい }