Wert von SET OF mit case abfragen?

[Glados]

Wie das mit einem Case gehtfunktioniert, weiß ich nicht. Aber es funktioniert so ja auch

Delphi-Quellcode:

 if TComErrors.ceRxParity in Errors then
  showmessage('ceRxParity in Set');

 if TComErrors.ceBreak in Errors then
  showmessage('ceBreak in Set');

In einem Set können ja mehrere Dinge stehen. Daher ist ein Case eh unangebracht.

Wenn du im Parameter Errors aber eh immer nur EINE Sache drin stehen hast, dann brauchst du kein Set dafür.
Dann also so:

Delphi-Quellcode:

case Errors oF
 TComErrors.ceRxParity: showmessage('ceRxParity in Set');
 TComErrors.ceBreak   : showmessage('ceBreak in Set');
end;