FiveTech Software tech support forums

... Para ListBox
REQUEST DBFCDX, DBFFPT

FUNCTION Main()

LOCAL oBrw, oDlgMain, uData

SET EXCLUSIVE OFF
SET DELETED ON
SET OPTIMIZE ON

SetGetColorFocus()

RDDSETDEFAULT("DBFCDX")
RDDREGISTER( "DBFCDX", 1 )

USE CUSTOMER NEW ALIAS CUST SHARED VIA 'DBFCDX'

DATABASE uData

DEFINE DIALOG ...

... include "FiveWin.ch"
#include "Fileio.ch"

Function Main()

local oBrw, oDlgMain, uData

SET EXCLUSIVE OFF
SET DELETED ON
SET OPTIMIZE ON

SetGetColorFocus()

USE CUSTOMER NEW ALIAS CUST SHARED VIA 'DBFCDX'
DATABASE uData

DEFINE DIALOG oDlgMain SIZE 640,460 PIXEL TITLE 'Doppio click su una ...

... FiveWin.ch"
#include "Fileio.ch"

Function Main()

local oBrw, oDlgMain, uData

SET EXCLUSIVE OFF
SET DELETED ON
SET OPTIMIZE ON

SetGetColorFocus()

USE CUSTOMER NEW ALIAS CUST SHARED VIA 'DBFCDX'
DATABASE uData

DEFINE DIALOG oDlgMain SIZE 640,460 PIXEL TITLE 'Doppio click su una ...

... en algunos casos
el color negro del texto va bien pero en otros casos no, obviamente puedo hacerle
pero, creo, me llevara mucho código.

Por esta razón busco una solución general, algo así como lo que tú mencionas, SetGetColorFocus())

Ojalá, Antonio Linares o Mr. Rao pudieran apoyarme.

Un abrazo

Armando:
Creo que no hay una funcion para generalizarlo (como SetGetColorFocus())
Pero en esos dialogos puedes ponerle la clausula COLOR CLR_WHITE en el DEFINE del mismo.

Código?

WHEN( .F. ) ?

SetGetColorFocus() ??

Regards, saludos.

Karinha, não uso when .f. neste campo é um campo normal, segue a linha:

REDEFINE GET oGet3300 VAR oArqCto:CALCATE ID 127 Bitmap "FINDP";
of Folder1:aDialogs[2] Picture "@!" Color Frente,Fundo update action Mostraate1()

Frente e ...

Código?

WHEN( .F. ) ?

SetGetColorFocus() ??

Regards, saludos.

Hi Rick ,

I had tried this SetGetColorFocus but does not work for READONLY GETs .

Thanks
Shridhar

Enrico

Hope this is what you are looking for ...

SetGetColorFocus( rgb(209,224,252) ) // global color for gets

Rick Lipkin