Boolean: Welcher Aufruf ist schneller?

[Boombuler]

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
var i:Cardinal;
loop:integer;
begin
  i := GettickCount;
  for Loop := 1 to 100000 do
  with CheckBox1 do
    begin
      Button1.Enabled := Checked;
      Button2.Enabled := Checked;
      Button3.Enabled := Checked;
      Button4.Enabled := Checked;
      Button5.Enabled := Checked;
      Button6.Enabled := Checked;

      {...}

      If Checked then
        //mach was
      else
        //mach was anderes
    end;
  showmessage(inttostr(Gettickcount - i));  
end;

Result -> 16 mili sek

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
var i:Cardinal;
loop:integer;
b:Boolean;
begin
  i := GettickCount;
  for Loop := 1 to 100000 do
  begin
  B := CheckBox1. Checked;

  Button1.Enabled := B;
  Button2.Enabled := B;
  Button3.Enabled := B;
  Button4.Enabled := B;
  Button5.Enabled := B;
  Button6.Enabled := B;

  end;
  showmessage(inttostr(Gettickcount - i));
end;

Result -> 16 mili sek