Wir sehen hier zwar die Deklaration von TImageType (singular), in dem Code gibt die Funktion aber TImageTypes (plural) zurück. Ich vermute, es gibt noch eine Deklaration in der Art
TImageTypes = set of TImageType;
Wenn es auch ein
TCreateImageTasks = set of TCreateImageTask;
gibt, dann kannst du den als Rückgabewert verwenden und der Code sollte funktionieren.
Es gibt halt einen Unterschied zwischen einem Aufzählungstypen und einem Set.
Außerdem kannst du auch einfach die Prozedur Include verwenden:
Delphi-Quellcode:
Result:=[];
if (W and BS_IMG_ISO)<>0 then Include(Result, itISO);
if (W and BS_IMG_BIN)<>0 then Include(Result, itBin);