Duda en Combobox

[jrestojeda]

Hola a todos.
Tengo una pequeña duda al redefinir un combobox, necesito cambiarle el font que trae por defecto y no me deja.

Asi defino el font.

Code: Select all  Expand view  RUN

DEFINE FONT oFont1 NAME "Courier New" SIZE 0,-14 BOLD


Así redefino el Comobobox con el font.

Code: Select all  Expand view  RUN

   REDEFINE COMBOBOX oCbx1 VAR vCbx1 ITEMS Ctas ID 100 OF oDlg;
      FONT oFont1


Desde ya muchas gracias.
Saludos a todos.
Desde Argentina Esteban.

[karinha]

Ejemplo:

Code: Select all  Expand view  RUN

    SET FONT OF oOutras        TO oFont //-> Botton
    SET FONT OF oDelivery      TO oFont //-> Botton
    SET FONT OF oDlg           TO oFont //-> Dialogo
    SET FONT OF oLbx           TO oFont //-> Listbox


[jrestojeda]

Karina,
Muchísimas gracias, funcionó perfecto!!
Saludos.

[horacio]

Otra

oCbx1 : SetFont( oFont )

Saludos