Ayuda con TSBROWSE

[Armando]

Amigos del foro, en especial Manuel Mercado:

Hasta ahora he usado TSbrowse con campos alfanúmericos en un ComboBox, por ejemplo:

acParent := {"Esposa(o)","Hija(o)","Padre","Madre"}

Y como el campo que recibe la información es alfanumerico de un caracter de longitud pues solo se guarda la E, H, P ó M según la elección del usuario, pero ahora necesito, con la misma TSbrowse, guardar un valor númerico, por ejemplo

Pongamos el caso de unas cuentas bancarias

12345 NOMBRE DE LA CUENTA A
67890 NOMBRE DE LA CUENTA B
65425 NOMBRE DE LA CUENTA C
etc

Necesito que el combobox muestra los nombres de las cuentas y que cuando el usuario seleccione alguna se guarde el número de la cuenta, si el usuario selecciona NOMBRE DE LA CUENTA B que se guarde en el campo de la DBF el número de la cuenta 67890

Espero haberme explicado y gracias por el apoyo.

Saludos

[mmercado]

Necesito que el combobox muestra los nombres de las cuentas y que cuando el usuario seleccione alguna se guarde el número de la cuenta, si el usuario selecciona NOMBRE DE LA CUENTA B que se guarde en el campo de la DBF el número de la cuenta 67890

Code: Select all  Expand view  RUN

   Local aNombres := { "Nombre de la cuenta A", "Nombre de la cuenta B", "Nombre de la cuenta C" }, ;
         aCuentas := { 12345, 67890, 65425 }, ;
         nColumn  := 1, ;     // numero de la columna con el control COMBOBOX dentro de oBrw
         cField   := "CUENUM" // nombre del campo que guarda el dato
         
   @  0,  0 BROWSE oBrw ALIAS "CUENTAS" ..........
   
   ADD COLUMN TO oBrw TITLE "Cuenta Bancaria" SIZE 100 PIXEL ;
       COMBOBOX DATA ComboWBlock( oBrw, cField, nColumn, { aNombres, aCuentas } )

Saludos.

Manuel Mercado

[Armando]

Maestro:

PERFECTO !, como siempre.

Muy agradecido