TSBUTTON is not getting focus in themed resource dialogs.

[RAMESHBABU]

Hi all

Has anybody faced this problem with TSBUTTON Class ?

If I use the TSBUTTON in a themed dialog from resources and if I
use tab button the focus is visible on all the dialog componenets except
the TSBUTTON. The dotted square is disappearing when the focus reaches to TSBUTTON. The is happening only the dialog is themed and it is from
resources.

Any solution please.

- Ramesh Babu P

[jrestojeda]

Hola amigo,
Prueba asi:

Code: Select all  Expand view

   REDEFINE SBUTTON Btn3  ID 200 OF oDlg RESOURCE "ALTA" BRUSH oBrush1;
      ACTION ABMCli(oDbf,oLbx,oDlg,45);
      TOOLTIP "Agregar un nuevo cliente";
      PROMPT "Alta"+CHR(13)+"INS" TEXT 4 W97;
      FONT oFont1

   Btn3:bGotFocus :={|| Btn3:SetColor(AzulB),Btn3:refresh()}
   Btn3:bLostFocus:={|| Btn3:SetColor(Negro),Btn3:refresh()}


Nota: Negro y AzulB son colores RGB( , , ) previamente definidos.

Code: Select all  Expand view

Local Negro,AzulB
Negro:=RGB( , , ) // Color cuando no tiene foco.
AzulB:=RGB( , , ) // Color cuando tiene foco.


Espero te sirva.
Saludos desde Argentina, Esteban.