Wert von SET OF mit case abfragen?

[SearchBot]

Hallo,

ich habe das:

Delphi-Quellcode:

procedure TForm1.ComPort1Error(Sender: TObject; Errors: TComErrors);

//  TComError = (ceFrame, ceRxParity, ceOverrun, ceBreak, ceIO, ceMode, ceRxOver, ceTxFull);
//  TComErrors: set of TComError;
var s:shortstring;
begin

und ich möchte jetzt mit einer Case-Struktur auf den Inhalt von Errors reagieren, wo zB nur drinsteht:

Code:

Errors = [ceBreak]

Wie mache ich das?

Delphi-Quellcode:

 case Errors of
  ceFrame: s:='Mist';
  ceBreak: s:='Abbruch';
 end;