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.