if-Abfrage vereinfachen

[Luckie]

Ich habe hier eine ziemlich grausame if-Abfrage. Kann man die eventuell vereinfachen?

Delphi-Quellcode:

  if (Show and not FShowGrid) or (Show and FShowGrid) then
  begin
    FImageEnVect.Bitmap.Canvas.Pen.Mode := pmBlack;
  end
  else if (FShowGrid and not Show) or (not FShowGrid and not Show) then
  begin
    FImageEnVect.Bitmap.Canvas.Pen.Mode := pmNotXor;
  end;