with sender

[Cyf]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var aBool: Boolean;
begin
  Showmessage(Inttostr(SizeOf(aBool)));
end;

Gibt bei mir 1 aus? Sollte das allerdings tatsächlich 4 Byte groß sein und das Programm lügt mich aus irgendwelchen Fragmentierungsgründen an, hab ich wieder einen Grund mehr, Einstellungen lieber in Sets zu speichern.