FiveTech Software tech support forums

Foreros:

Con el siguiente código en el MAIN, se define el color de los GET al tomar el foco y al perderlo
Pero para los campos TEXT (MEMO) no funciona, hay forma?

Saludos

... box.

25. **`lClrFocus`**:
- **Type**: Logical
- **Description**: Indicates whether the color changes when the combo box gets focus.

26. **`nClrFocus`**:
- **Type**: Numeric
- **Description**: Color to use when the combo box is focused.

27. **`aProperties`**:
- **Type**: Array ...

Mr. Rao:

It's an excellent sample, but I have several dialogs with several SAY (text) and I looking for
a global solution as Tget():nClrFocus := RGB( 168, 211, 255 ) for GET controls, if it's possible

With best regards

TGet():bColorBlock := { |oGet| IF( oGet:lFocused, { CLR_WHITE, CLR_HBLUE }, IF( .NOT. oGet:lActive, {CLR_BLACK, CLR_HGRAY}, {CLR_BLACK, CLR_WHITE} )) }

thank´s

For global setting it is

setgetcolorfocus(rgb(209,224,252))

so maybe the nRgb should be rgb(40,255,255)

Buenas buenas gente!

Intente con nRGB y RGB y no me cambia el color del foco. que hago mal?



Gracias!

March 2015
==========

* New: function SetCbxColorFocus( nClrFocus ) same as SetGetColorFocus() but for
ComboBoxes. We tried to take these functions into Class TControl may there are
many side effects for other controls.

* Enhancement: Class TComboBox support for color change on focus gain/loose.

Thanks master. Perfecto!

// adhemar.prg#include "FiveWin.ch"  function Main()   LOCAL oDlg, oCbx, cDia   LOCAL nOldColor   DEFINE DIALOG oDlg   @ 1, 3 COMBOBOX oCbx VAR cDia OF oDlg SIZE 100, 300 UPDATE           &nbsp ...

Try

   local nOldColor   .../... @ 10, 10 COMBOBOX oCbx VAR cItem ITEMS { "Testing", "this", "ComboBox" } SIZE 200, 460 OF oDlg PIXEL HEIGHTGET 18 UPDATE//; nOldColor   := SetCbxColorFocus( CLR_YELLOW )   .../...

Algun ejemplo?

March 2015
==========

* New: function SetMGetColorFocus( nClrFocus ) same as SetGetColorFocus() but for GETs
multilines.

* Enhancement: Class TMultiGet support for color change on focus gain/loose.

* New: function SetCbxColorFocus( nClrFocus ) same as SetGetColorFocus() but for
ComboBoxes. We ...

... for disable colors and select colors
TGet():lDisColors := .f. // Do Not Use standard disabled colors
// I like to have light blue background on focused gets so next line is un-commented.
// TGet():nClrFocus := 16577214 // use light blue color to use when GET is focused and lClrFocus is .T.

... FW can display / use and get back the parameters or values to use it in out programs ? For example, if I want to pass the SetGetColorFocus([nClrFocus]) function a number that represent the old Clipper color "BG+/N" how do I find out the correct value ? Is like a Clipper color value to FW ...