In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

problema con ComboBoxEx

Foro público de Xailer en español
Responder
rcardenas
Mensajes: 55
Registrado: Lun Oct 11, 2004 2:11 am

problema con ComboBoxEx

Mensaje por rcardenas »

Hola
Estoy tratando de utilizar un pequeño ComboBoxEx para seleccionar el Idioma, pero no me muestra nada en el control. La rutina es la siguiente:
METHOD FormInitialize( oSender ) CLASS TForm0101E
WITH OBJECT ::oComboBoxEx1
WITH OBJECT :oImageList
:Add( "Espanol" )
:Add( "Ingles" )
END
// AddItem( cString, cBitmap, nIndent, nSelectedImage )
:AddItem( "Español","Espanol.Bmp",,1 )
:AddItem( "Inglés" ,"Ingles.Bmp" ,,2 )
END
RETURN Nil
Agradezco cualquier ayuda.
--
Saludos

Raúl Eduardo Cárdenas S.
Law & Accounting System's, Inc.
Gerente General
Celular: (507) 672-8838
Email: rcardenas@fgs2002.com
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.802 / Virus Database: 545 - Release Date: 11/26/2004
--
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5706
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

problema con ComboBoxEx

Mensaje por jfgimenez »

Raúl,
en vez de:
:AddItem( "Español","Espanol.Bmp",,1 )
:AddItem( "Inglés" ,"Ingles.Bmp" ,,2 )
prueba:
:AddItem( "Español",,, 1 )
:AddItem( "Ingles",,, 2 )
--
Un saludo,
José F. Giménez
--
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
rcardenas
Mensajes: 55
Registrado: Lun Oct 11, 2004 2:11 am

problema con ComboBoxEx

Mensaje por rcardenas »

Jose F.
Me hace lo mismo, no mustra nada
--
Saludos

Raúl Eduardo Cárdenas S.
Law & Accounting System's, Inc.
Gerente General
Celular: (507) 672-8838
Email: rcardenas@fgs2002.com
"José F. Giménez" <jfgimenez@wanadoo.es> escribió en el mensaje news:41adbeda$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
Raúl,
en vez de:
:AddItem( "Español","Espanol.Bmp",,1 )
:AddItem( "Inglés" ,"Ingles.Bmp" ,,2 )
prueba:
:AddItem( "Español",,, 1 )
:AddItem( "Ingles",,, 2 )
--
Un saludo,
José F. Giménez
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.802 / Virus Database: 545 - Release Date: 11/26/2004
--
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5706
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

problema con ComboBoxEx

Mensaje por jfgimenez »

Raúl,
parece que hay algún bug dentro de la clase. Esta tarde intentaré revisarla. Mientras tanto, prueba simplemente con esto:
METHOD FormInitialize( oSender ) CLASS TForm0101E
WITH OBJECT ::oComboBoxEx1
:AddItem( "Español","Espanol.Bmp" )
:AddItem( "Inglés" ,"Ingles.Bmp" )
:nIndex := 1
END
RETURN Nil
--
Un saludo,
José F. Giménez
--
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
rcardenas
Mensajes: 55
Registrado: Lun Oct 11, 2004 2:11 am

problema con ComboBoxEx

Mensaje por rcardenas »

José F.
SIgue Igual, solo muestra la palabra "Español" pero no permite cambiar ni moverse.
--
Saludos

Raúl Eduardo Cárdenas S.
Law & Accounting System's, Inc.
Gerente General
Celular: (507) 672-8838
Email: rcardenas@fgs2002.com
"José F. Giménez" <jfgimenez@wanadoo.es> escribió en el mensaje news:41aef16f$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
Raúl,
parece que hay algún bug dentro de la clase. Esta tarde intentaré revisarla. Mientras tanto, prueba simplemente con esto:
METHOD FormInitialize( oSender ) CLASS TForm0101E
WITH OBJECT ::oComboBoxEx1
:AddItem( "Español","Espanol.Bmp" )
:AddItem( "Inglés" ,"Ingles.Bmp" )
:nIndex := 1
END
RETURN Nil
--
Un saludo,
José F. Giménez
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.804 / Virus Database: 546 - Release Date: 11/30/2004
--
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5706
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

problema con ComboBoxEx

Mensaje por jfgimenez »

Raúl,
por favor, utiliza la opción "Publicar proyecto" del menú "Proyecto" y
envíame el fichero .zip.
NOTA: Antes de enviármelo, por favor, incluye los bitmaps dentro del .zip
--
Un saludo,
José F. Giménez
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Responder