componentes visuales y speedbutton

[JaMFrY]

Tengo una aplicacion que la cree hace tiempo i la deje parada, ahora estoi interesado en hacer una nueva version de mi aplicacion y decidi poner componentes visuales para mejorarla un poco y hacerla mas atractiba, en especial los botones.

La aplicacion tiene speedbutton con codigos por ejemplo como este:

frmMain.strStatus:='Intentando poner en ' + LowerCase(TSpeedButton(Sender).Caption) + ' capslock...';
frmMain.SendCommand(COMANDO_CAPS_LOCK,IntToStr((Sender as TSpeedButton).Tag));

El problema biene al poner el codigo en formato del componente que seria este:

frmMain.strStatus:=''Intentando poner en ' +  LowerCase(TFlatButton(Sender).Caption) + ' capslock...'';
frmMain.SendCommand(COMMANDO_CAPS_LOCK,IntToStr((Sender as TFlatButton).Tag));

en la form tengo 2 speedbutton con el mismo codigo y lo que hace este codigo ((Sender as TFlatButton).Tag)) es saver que boton pulsa el usuario, activar o desactibar el bloq mayusculas, pero cuando lo pongo en codigo del componente no funciona , nada mas me lo desactiva no me lo actiba el bloq mayusculas!