Setz mal AllowAllUp der SpeedButtons auf True
[edit]
ach ja, wenn [OFF] auch noch "down" werden soll, wenn sonst nix "down" ist, dann
zusätzlich einfach noch allen SpeedButtons diese OnClick-Prozedur zuweisen
Delphi-Quellcode:
// 3 Buttons - und der 1. ist immer gedrückt, wenn sonst nix gedrückt ist
Procedure TForm1.SpeedButton1to3Click(Sender: TObject);
Begin
If not SpeedButton2.Down and not SpeedButton3.Down Then
SpeedButton1.Down := True;
End;