SpeeedButton Properties: Down nicht manipulierbar

[hoika]

Hallo,
mache mal ein Minimal-Bsp.

1 BitBtn, 1 SpeedBtn.

Und dann

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  SpeedButton1.Down:= not SpeedButton1.Down;

  // Fürs Debuggen
  if Sender=nil then
  begin

  end;
end;

Dann hänge das Projekt als Zip hier an, also das ganze Verzeichnis ohne die Exe.