Código Delphi
[-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
TSpeedButtonBordeColor(Sender).PressKey(TSpeedButtonBordeColor(Sender).KeyDefault,key,Shift);
end;
el sender es el TForm donde se pulsa la tecla y tú lo moldeas a TSpeedbutton, yo no le veo sentido, es más, debe petar porque estás moldeando el Form como si fuera un TSpeedButtonBordeColor, y para colmo lo haces acceder al método PressKey que no va a estar en esa posición de memoria...
Creo los moldeo de tipos no van ahí. Sería el nombre de tu componente "speedbutton3" o lo que sea.