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
Ayuda con TSBROWSE
Ayuda con TSBROWSE
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Re: Ayuda con TSBROWSE
Armando wrote: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
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 } )
Manuel Mercado
Maestro:
PERFECTO !, como siempre.
Muy agradecido
PERFECTO !, como siempre.
Muy agradecido
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero