Delphi-Quellcode:
TYPE
TIntSet = set of char;
VAR
Set1,set2,set3:TIntSet;
begin
Set1:=[#1..#128];
set2:=[#228,#246];
set3:=set1*set2;
Das funktioniert nun schon, auch wenn wir von der Frage, die ja eigentlich beantwortet ist, seit Hagen abschweifen. Und nun, was ist in set3 drin? Wie kann ich es anzeigen?