FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Cambiar color en los get's activos (2007)
Posts: 257
Joined: Tue May 16, 2006 04:46 PM
Cambiar color en los get's activos (2007)
Posted: Sat Sep 22, 2007 01:02 AM

Hola foro,

He visto esta inquietud varias veces en el foro y me gustaría saber si en las recientes versiones de FWH ya se tiene contemplado esto sin tener que modificar el TGet (para no tener que modificarlo en cada nueva version)

RodolfoRBG
FWH 1307, xHarbour123 BCC582
rodolfoerbg@gmail.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Cambiar color en los get's activos (2007)
Posted: Sat Sep 22, 2007 07:36 AM

Rodolfo,

FWH no lo incluye ya que no es un comportamiento estandard de Windows. Es decir, las aplicaciones Windows no cambian los colores de los GETs normalmente, aunque es cierto que así se ayuda al usuario a indicarle el GET activo.

Podríamos considerar el implementarlo en la clase TGet, si un cierto número de usuarios lo solicitasen. Es algo bastante sencillo.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Cambiar color en los get's activos (2007)
Posted: Sat Sep 22, 2007 12:28 PM

Holas,,, Yo uso BTNGET en todos los gets,, y a los activos les pone un color amarillo suave que va bien,,,,

REDEFINE BTNGET oGet1 ........

Salu2

Posts: 257
Joined: Tue May 16, 2006 04:46 PM
Cambiar color en los get's activos (2007)
Posted: Sat Sep 22, 2007 05:43 PM

Don Antonio,

Por lo que he visto en el foro, este es un tema recurrente y cada vez que alguien lo pregunta cada quien le da una solución diferente por lo que lo ideal sería una solución oficial, algo asi como un SET TGETCOLOR ON en nuestro PRG principal para que lo trabaje.

En cuanto a que requieres que cierto numero de usuarios lo soliciten, no se cuantos necesitarías pero por lo pronto cuenta quienes lo han preguntado y quienes han respondido cada quien a su manera como una base de usuarios interesados en que lo implementes.

Salu2 y 'chas gracias

RodolfoRBG
FWH 1307, xHarbour123 BCC582
rodolfoerbg@gmail.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Cambiar color en los get's activos (2007)
Posted: Sat Sep 22, 2007 06:21 PM

Rodolfo,

Es muy simple modificar la clase TGet de FWH para implementarlo:

METHOD GotFocus() ...
...
::SetColor( ..., ... )
...

METHOD LostFocus() ...
...
::SetColor( ..., ... )
...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 257
Joined: Tue May 16, 2006 04:46 PM
Cambiar color en los get's activos (2007)
Posted: Sun Sep 23, 2007 03:53 AM

Gracias Don Antonio,

Lo del SET TGETCOLOR ON yo lo decia para futuras versiones y no tener que asi que parchar cada vez que cambiemos de versión.

RodolfoRBG
FWH 1307, xHarbour123 BCC582
rodolfoerbg@gmail.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Cambiar color en los get's activos (2007)
Posted: Sun Sep 23, 2007 06:39 AM

Rodolfo,

Vamos a modificar la clase TGet aqui e implementarle una nueva DATA nClrFocus que en caso de estar definida, se usará automaticamente.

En cuanto este modificada te la enviamos para que la pruebes, gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Cambiar color en los get's activos (2007)
Posted: Sun Sep 23, 2007 07:35 AM

Rodolfo,

Implementado. Hay una nueva función SetGetColorFocus( [ nClrFocus ] ) que activa el cambio de color en todos los GETs y opcionalmente te permite seleccionar el color que deseas usar para GETs con focus. Por defecto usa un amarillo parecido al de los tooltips.

Ejemplo de uso:

SetGetColorFocus() // change GET colors when focused

DEFINE DIALOG oDlg TITLE ...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 257
Joined: Tue May 16, 2006 04:46 PM
Cambiar color en los get's activos (2007)
Posted: Tue Sep 25, 2007 03:22 AM

Don Antonio,

Gracias, funciona muy bien en los GETs excepto cuando es uno MULTILINE. Es eso normal?

Este cambio quedará implementado para futuras versiones?

RodolfoRBG
FWH 1307, xHarbour123 BCC582
rodolfoerbg@gmail.com

Continue the discussion