type
  TFeld = (A, B, C, D, E, F, G, H, I, J, K);
  TFelder = set of TFeld;

var
  FPflichtfelder: TFelder = [A, B, C, D];
  FVar1: TFelder = [A, C, E];
  FVar2: TFelder = [A, B, C, D, E];

  function Pruefe(Var1, Var2: TFelder): Boolean;
  begin
    // Hier mit einem Einzeiler machbar ?
  end;

begin
  if Pruefe(FVar1, FPflichtfelder) then {...} // -> FALSE
  if Pruefe(FVar2, FPflichtfelder) then {...} // -> TRUE
end;