Cargar Datos en Combobox desde el load

195 views
Skip to first unread message

Lisímaco Ramón Sánchez Marín

unread,
Oct 29, 2014, 7:15:15 PM10/29/14
to vfpl...@googlegroups.com
En esta ocacion me dirijo a ustedes para hacerles una consulta sobre los load en el form, en mi ventana tengo 3 combobox

quisiera que se llenaran en el load del form pero cuando hago la llamada al form me da un error diciendo que la variable COMBO1 no se encuentra

pero utilizo el mismo codigo en un boton fuera del load y funciona sim problemas,llena los 3 combobox

aqui les dejo el codigo

lcStringCnxLocal = "DSN=Clinica;SERVER=localhost;UID=root;PWD=1234;DATABASE=clinica;PORT=3306"
SQLSETPROP(0,"DispLogin",3)
lnHandle = SQLSTRINGCONNECT(lcStringCnxLocal)

IF lnHandle > 0

    sqlexec(lnHandle,"SELECT clinica.marca.Nombre_Marca FROM clinica.marca;","listaDeMarcas")
    thisform.combo1.RowSourceType = 6     
    thisform.combo1.rowsource = "listaDeMarcas.Nombre_Marca"
   
    sqlexec(lnHandle,"SELECT clinica.proveedor.Nombre_Proveedor FROM clinica.proveedor;","listaDeProductos")
    thisform.combo2.rowsourcetype=6  
    thisform.combo2.rowsource = "listaDeProductos.Nombre_Proveedor"

    sqlexec(lnHandle,"SELECT clinica.categoria.Nombre_Categoria FROM clinica.categoria;","listaDeCategoria")
    thisform.combo3.rowsourcetype=6  
    thisform.combo3.rowsource = "listaDeCategoria.Nombre_Categoria"
   
ELSE
  MESSAGEBOX("No se pudo conectar a la Base de Datos")
ENDIF
SQLDISCONNECT(lnHandle)

Alex Orihuela Rosales

unread,
Oct 29, 2014, 7:29:58 PM10/29/14
to vfpl...@googlegroups.com
Doc
El visual fox no va a reconocer a tus objetos desde el load... te recomiendo que lo hagas desde el INIT

Por cierto yo recomiendo lo siguiente para cargar cursores en combos:

thisform.cmbNombreCombo.RowSourceType = 2
thisform.cmbNombreCombo.RowSource = "WNombreCursor.Campo1, Campo2"
thisform.cmbNombreCombo.BoundColumn = 2

Por lo general el Campo2 es la llave principal de mi cursor.

Saludos
Alex.

--
Has recibido este mensaje porque estás suscrito al grupo "Visual Foxpro Latinoamérica" de Grupos de Google.
Visita este grupo en http://groups.google.com/group/vfplatino.

Jorge Murguia

unread,
Oct 29, 2014, 9:17:17 PM10/29/14
to vfpl...@googlegroups.com

Yo lo haría desde el init y además los declararia como variables públicas

Hernan Cano

unread,
Oct 30, 2014, 2:13:45 AM10/30/14
to vfpl...@googlegroups.com
Jorge:
Lo que indicas no es muy acertado. Si en tu experiencia lo haces, bien --- pero recomendar el uso de vbles públicas es muy desacertado.

Sinceramente espero que tu comentario sea un adelanto a viernes, que sea una broma, ...

Alex Orihuela Rosales

unread,
Oct 30, 2014, 9:36:26 AM10/30/14
to vfpl...@googlegroups.com
Variables Públicas?
Por qué y para que?
Saludos
Alex

Jorge Murguia

unread,
Oct 30, 2014, 9:39:55 AM10/30/14
to vfpl...@googlegroups.com

Desde que me inicie a trabajar en esto y me han funcionado

Alex Orihuela Rosales

unread,
Oct 30, 2014, 9:53:40 AM10/30/14
to vfpl...@googlegroups.com
Que funcione no significa que sea lo mejor.
Saludos
Alex

Jorge Murguia

unread,
Oct 30, 2014, 9:58:51 AM10/30/14
to vfpl...@googlegroups.com

Estoy de acuerdo, pero llevo años haciéndolo así y en poco tiempo migro de vfp

Alex Orihuela Rosales

unread,
Oct 30, 2014, 10:01:35 AM10/30/14
to vfpl...@googlegroups.com
En todos los lenguajes es recomendable usar la menor cantidad de variables públicas por el uso de recursos.
Saludos
Alex

Jorge Murguia

unread,
Oct 30, 2014, 10:04:37 AM10/30/14
to vfpl...@googlegroups.com

Si es cierto, por eso también soy muy cauto en el uso de las mismas

Reply all
Reply to author
Forward
0 new messages