Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?

[uligerhardt]

Dumme Frage: Warum nimmst du statt dem:

Zitat von Zacherl:

Delphi-Quellcode:

  {$IFDEF DEBUG}
  if (TypInfo^.Kind <> tkEnumeration) then
  begin
    raise Exception.Create('Invalid generic type.');
  end;
  {$ENDIF}

nicht einfach Assert?
  Assert(TypInfo^.Kind = tkEnumeration, 'Invalid generic type.');