Set in INI speichern

[marabu]

Hi.

32 member hatte der Set ganz früher einmal. Bei Borland hat ein Set 256 member (bit) - der Zugriff sollte besser auf den ganzen Set erfolgen:

Delphi-Quellcode:

type
  THackedSet = packed record case Integer of
    0: (AsSet: set of Char);
    1: (AsArray: array [0..7] of Cardinal);
  end;

var
  hs: THackedSet;
  i: Integer;

begin
  with hs do
  begin
    AsSet := [#0, #255];
    for i := Low(AsArray) to High(AsArray) do
      ShowMessage(IntToHex(AsArray[i], 8));
  end;
end;

Grüße vom marabu