Boolean: Welcher Aufruf ist schneller?

[Helmi]

Hallo,

ich hab in meinem Projekt eine CheckBox und im OnClick-Ereignis hab ich folgendes drinstehen:

Code:

procedure TForm1.CheckBox1Click(Sender: TObject)
begin
  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;
end;

gestern hab ich zufälligerweise ein Code-Schnipsel entdeckt und da wird das so gemacht:

Code:

procedure TForm1.CheckBox1Click(Sender: TObject)
var
  B: Boolean;

begin
  B := CheckBox1. Checked;

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

  If B then
    //mach was
  else
    //mach was anderes
end;

Jetzt meine Frage: Welche der beiden Möglichkeiten ist schneller oder sind beide gleich schnell?