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:
Código:
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:
Código:
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!