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.

ComboBoxEx

Foro de Xailer profesional en español
Responder
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

ComboBoxEx

Mensaje por carlosijc »

Bueno,, si se dan cuenta lo que estoy haciendo es poniendo mas elegante lo
que tengo hecho.
Dejame ver si me explico.
El caso es que con el Combox normal, hago esto, si las imagenes, ahora
quisiera usar las imagenes y por supuesto debo usar el ComboBoxEx,, hago
esto y nunca se me llena,, que hago mal, que me falta,, de todas las maneras
aqui va un adjunto.
METHOD CBCreate( oSender ) CLASS TForm1
LOCAL cDescrip
local aImag :={"User1","Grupo1"}
WITH OBJECT ::oCB
::oDS6:Select()
::oDS6:GoTop()
Do While !::oDS6:Eof()
cDescrip := ::oDS6:idusrgrp+" "+alltrim(::oDS6:Nombre)
*logdebug(cDescrip)
::oCB:AddItem(cDescrip,"User",2,2)
::oDS6:Skip()
EndDo
END
RETURN Nil


Attached files ComboEx.rar (7.2 KB)Â
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9253
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

ComboBoxEx

Mensaje por ignacio »

Carlos,
Manda la DBF por favor.
Gracias,
"Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
news:[email=424c9cdb@ozsrv2.ozlan.local...]424c9cdb@ozsrv2.ozlan.local...[/email]
> Bueno,, si se dan cuenta lo que estoy haciendo es poniendo mas elegante lo
> que tengo hecho.
>
> Dejame ver si me explico.
>
> El caso es que con el Combox normal, hago esto, si las imagenes, ahora
> quisiera usar las imagenes y por supuesto debo usar el ComboBoxEx,, hago
> esto y nunca se me llena,, que hago mal, que me falta,, de todas las
> maneras
> aqui va un adjunto.
>
>
> METHOD CBCreate( oSender ) CLASS TForm1
> LOCAL cDescrip
> local aImag :={"User1","Grupo1"}
> WITH OBJECT ::oCB
> ::oDS6:Select()
> ::oDS6:GoTop()
> Do While !::oDS6:Eof()
> cDescrip := ::oDS6:idusrgrp+" "+alltrim(::oDS6:Nombre)
> *logdebug(cDescrip)
> ::oCB:AddItem(cDescrip,"User",2,2)
> ::oDS6:Skip()
> EndDo
> END
> RETURN Nil
>
>
>
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

ComboBoxEx

Mensaje por carlosijc »

Aui va
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:424d0364$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Carlos,
>
> Manda la DBF por favor.
>
> Gracias,
>
> "Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
> news:[email=424c9cdb@ozsrv2.ozlan.local...]424c9cdb@ozsrv2.ozlan.local...[/email]
> > Bueno,, si se dan cuenta lo que estoy haciendo es poniendo mas elegante
lo
> > que tengo hecho.
> >
> > Dejame ver si me explico.
> >
> > El caso es que con el Combox normal, hago esto, si las imagenes, ahora
> > quisiera usar las imagenes y por supuesto debo usar el ComboBoxEx,, hago
> > esto y nunca se me llena,, que hago mal, que me falta,, de todas las
> > maneras
> > aqui va un adjunto.
> >
> >
> > METHOD CBCreate( oSender ) CLASS TForm1
> > LOCAL cDescrip
> > local aImag :={"User1","Grupo1"}
> > WITH OBJECT ::oCB
> > ::oDS6:Select()
> > ::oDS6:GoTop()
> > Do While !::oDS6:Eof()
> > cDescrip := ::oDS6:idusrgrp+" "+alltrim(::oDS6:Nombre)
> > *logdebug(cDescrip)
> > ::oCB:AddItem(cDescrip,"User",2,2)
> > ::oDS6:Skip()
> > EndDo
> > END
> > RETURN Nil
> >
> >
> >
>
>


Attached files x.DBF (482 B)Â
Arriba
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

ComboBoxEx

Mensaje por carlosijc »

La Dbf esta en en el compactado,, se llama x.dbf
GRaccias
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:424d0364$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Carlos,
>
> Manda la DBF por favor.
>
> Gracias,
>
> "Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
> news:[email=424c9cdb@ozsrv2.ozlan.local...]424c9cdb@ozsrv2.ozlan.local...[/email]
> > Bueno,, si se dan cuenta lo que estoy haciendo es poniendo mas elegante
lo
> > que tengo hecho.
> >
> > Dejame ver si me explico.
> >
> > El caso es que con el Combox normal, hago esto, si las imagenes, ahora
> > quisiera usar las imagenes y por supuesto debo usar el ComboBoxEx,, hago
> > esto y nunca se me llena,, que hago mal, que me falta,, de todas las
> > maneras
> > aqui va un adjunto.
> >
> >
> > METHOD CBCreate( oSender ) CLASS TForm1
> > LOCAL cDescrip
> > local aImag :={"User1","Grupo1"}
> > WITH OBJECT ::oCB
> > ::oDS6:Select()
> > ::oDS6:GoTop()
> > Do While !::oDS6:Eof()
> > cDescrip := ::oDS6:idusrgrp+" "+alltrim(::oDS6:Nombre)
> > *logdebug(cDescrip)
> > ::oCB:AddItem(cDescrip,"User",2,2)
> > ::oDS6:Skip()
> > EndDo
> > END
> > RETURN Nil
> >
> >
> >
>
>
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9253
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

ComboBoxEx

Mensaje por ignacio »

Carlos,
No haces nada mal. Es un error nuestro, lo siento. Intentaremos arreglarlo
lo antes posible.
Un saludo,
"Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
news:[email=424da5d6@ozsrv2.ozlan.local...]424da5d6@ozsrv2.ozlan.local...[/email]
> La Dbf esta en en el compactado,, se llama x.dbf
>
> GRaccias
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:424d0364$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Carlos,
>>
>> Manda la DBF por favor.
>>
>> Gracias,
>>
>> "Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
>> news:[email=424c9cdb@ozsrv2.ozlan.local...]424c9cdb@ozsrv2.ozlan.local...[/email]
>> > Bueno,, si se dan cuenta lo que estoy haciendo es poniendo mas elegante
> lo
>> > que tengo hecho.
>> >
>> > Dejame ver si me explico.
>> >
>> > El caso es que con el Combox normal, hago esto, si las imagenes, ahora
>> > quisiera usar las imagenes y por supuesto debo usar el ComboBoxEx,,
>> > hago
>> > esto y nunca se me llena,, que hago mal, que me falta,, de todas las
>> > maneras
>> > aqui va un adjunto.
>> >
>> >
>> > METHOD CBCreate( oSender ) CLASS TForm1
>> > LOCAL cDescrip
>> > local aImag :={"User1","Grupo1"}
>> > WITH OBJECT ::oCB
>> > ::oDS6:Select()
>> > ::oDS6:GoTop()
>> > Do While !::oDS6:Eof()
>> > cDescrip := ::oDS6:idusrgrp+" "+alltrim(::oDS6:Nombre)
>> > *logdebug(cDescrip)
>> > ::oCB:AddItem(cDescrip,"User",2,2)
>> > ::oDS6:Skip()
>> > EndDo
>> > END
>> > RETURN Nil
>> >
>> >
>> >
>>
>>
>
>
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
Responder

Volver a “Spanish”