Thema: Delphi Frage zu GetEnumValue

Einzelnen Beitrag anzeigen

Niels

Registriert seit: 25. Okt 2003
192 Beiträge
 
#1

Frage zu GetEnumValue

  Alt 29. Jul 2004, 08:04
Hallo,

hier mal ein Beispiel um meine Frage verständlicher zu machen:

Delphi-Quellcode:
type
  TMeinTyp = (mtA, mtB, mtC);

procedure bla(x: string);
var
  hilf: TMeinTyp;
begin
  hilf := TMeinTyp(GetEnumValue(TypeInfo(TMeinTyp), x));
  ...
end;
Mein Problem liegt jetzt darin, wenn x weder mtA, noch mtB oder mtC ist. Wenn ich Debugge steht da:
Code:
hilf = (out of bound) -1
Wie kann ich jetzt abfragen ob das nun -1 ist.
if hilf = -1 then funktioniert nicht, da -1 nicht vom Typ TMeinTyp ist? Der einzige wichtige Fall ist aber, wenn hilf = -1.

mfg Niels
  Mit Zitat antworten Zitat