man könnte es auch einsetzen, um geziehlt bitmanipulation zu betrieben:
Delphi-Quellcode:
type
TFlags = record
case boolean of
TRUE: (Flags: Byte);
FALSE: (F1, F2, F3, F4, F5, F6, F7: Boolean;)
end;
damit kann man beliebigs bits im byte ändern, aber auch das ganze byte mit einem wisch aus/einlesen
stefan