Enumerationen verwenden

Lieber @Torben, ein kurzer Hinweis von Dir, bitte:

Bei Delphi Basics liest man, daß man Enumerationen auch als Zahlen behandeln kann, also sollte etwa im Falle TPlaylistItemType

pitMusic < pitVoice = true

gelten.

Irgendwie funktioniert das aber nicht bei mir und liefert immer einen Type-mismatch-Fehler:

function CheckFileExist(Item: IPlaylistItem): boolean;
var
  ItemType: TPlaylistItemType;
begin
  ItemType := Item.GetItemType;
  if (ItemType > pitUnknown) AND (ItemType < pitStream) then
    Result := true
  else Result := false;
end;

Was mache ich falsch? Ginge es, ersparte mir das eine geradezu monströse if-Abfrage.

Pascal Script ist nicht Delphi, einige Dinge funktionieren dort nicht.

1 Like

Merci! Wollte nur ausschließen, daß es ein Level-8-Fehler ist.

Anderes prominentes Beispiel: inc(i) geht nicht, man muss immer i := i + 1 schreiben.

1 Like