La duda es:
Como le hago para integrar un Checkbox en una columna de un DbfBrowse.
Lo que pretendo es que el usuario con un simple click, en cualquier línea
del DbfBrowse
Marque y Desmarque la columna del Checkbox en forma alternada.
Saludos
Guillermo Guevara Carrillo
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.
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.
Integrar un Checkbox en un DBFBrowse
-
Guillermo Guevara Car
- Mensajes: 176
- Registrado: Sab Ene 19, 2008 5:52 pm
-
Guillermo Guevara Car
- Mensajes: 176
- Registrado: Sab Ene 19, 2008 5:52 pm
Integrar un Checkbox en un DBFBrowse
Toc, Toc, Toc.......
Hay alguién en casa
Ing. Guillermo Guevara Carrillo
> La duda es:
>
> Como le hago para integrar un Checkbox en una columna de un DbfBrowse.
> Lo que pretendo es que el usuario con un simple click, en cualquier línea
> del DbfBrowse
> Marque y Desmarque la columna del Checkbox en forma alternada.
>
> Saludos
>
> Guillermo Guevara Carrillo
>
Hay alguién en casa
Ing. Guillermo Guevara Carrillo
> La duda es:
>
> Como le hago para integrar un Checkbox en una columna de un DbfBrowse.
> Lo que pretendo es que el usuario con un simple click, en cualquier línea
> del DbfBrowse
> Marque y Desmarque la columna del Checkbox en forma alternada.
>
> Saludos
>
> Guillermo Guevara Carrillo
>
-
Bingen Ugaldebere
- Mensajes: 1310
- Registrado: Mié Sep 26, 2007 7:12 pm
Integrar un Checkbox en un DBFBrowse
No puedes poner un checkbox directamente pero la manera de hacerlo es
usando 2 bitmap de 16 bits con el Checkbox marcado y desmarcado.
Yo uso dos luces verde y roja que te adjunto.
Para ello has de crear el DbfBrowse y en su oImageLIst añadir ambos
bitmaps, después al crear la columna que quieres que aparezca con el
CheckBox le añades un campo como de costumbre y saldrña su valor, luego
vas a su evento OngetData y escribes algo parecido a esto dependiendo
del campo que quieras controlar
METHOD DBBrowse1Column6GetData( oSender, Value, nImage ) CLASS TFormClientes
If Value="Casado"
nImage := 2
Value :=""
Else
nImage := 1
Value :=""
Endif
RETURN Nil
De esta forma el campo que en origen ponía "Casado" ahora aparecera con
el bitmap 2 y el value "" para que no se vea el texto y si no esta
casado aparecerá el bitmap 1
Si quieres que cambie al hacer clic en una línea tendrñas que utilizar
el evento OnClick para cambiar el valor del campo asignado a la columna
y con eso cambiará el bitmap el solito.
Facil no?
Salu2
--
usando 2 bitmap de 16 bits con el Checkbox marcado y desmarcado.
Yo uso dos luces verde y roja que te adjunto.
Para ello has de crear el DbfBrowse y en su oImageLIst añadir ambos
bitmaps, después al crear la columna que quieres que aparezca con el
CheckBox le añades un campo como de costumbre y saldrña su valor, luego
vas a su evento OngetData y escribes algo parecido a esto dependiendo
del campo que quieras controlar
METHOD DBBrowse1Column6GetData( oSender, Value, nImage ) CLASS TFormClientes
If Value="Casado"
nImage := 2
Value :=""
Else
nImage := 1
Value :=""
Endif
RETURN Nil
De esta forma el campo que en origen ponía "Casado" ahora aparecera con
el bitmap 2 y el value "" para que no se vea el texto y si no esta
casado aparecerá el bitmap 1
Si quieres que cambie al hacer clic en una línea tendrñas que utilizar
el evento OnClick para cambiar el valor del campo asignado a la columna
y con eso cambiará el bitmap el solito.
Facil no?
Salu2
--
-
Guillermo Guevara Car
- Mensajes: 176
- Registrado: Sab Ene 19, 2008 5:52 pm
Integrar un Checkbox en un DBFBrowse
Bingen:
Eres un superdotado, bién me lo decia Rene Flores cuando estuve en su curso.
Te agradezco todo el apoyo que siempre me has dado
Gracias
Ing. Guillermo Guevara Carrillo
"Bingen Ugaldebere" <bingen@muninser.com> escribió en el mensaje
news:480e325d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> No puedes poner un checkbox directamente pero la manera de hacerlo es
> usando 2 bitmap de 16 bits con el Checkbox marcado y desmarcado.
>
> Yo uso dos luces verde y roja que te adjunto.
>
> Para ello has de crear el DbfBrowse y en su oImageLIst añadir ambos
> bitmaps, después al crear la columna que quieres que aparezca con el
> CheckBox le añades un campo como de costumbre y saldrña su valor, luego
> vas a su evento OngetData y escribes algo parecido a esto dependiendo
> del campo que quieras controlar
>
> METHOD DBBrowse1Column6GetData( oSender, Value, nImage ) CLASS
> TFormClientes
>
> If Value="Casado"
> nImage := 2
> Value :=""
> Else
> nImage := 1
> Value :=""
> Endif
>
> RETURN Nil
>
> De esta forma el campo que en origen ponía "Casado" ahora aparecera con
> el bitmap 2 y el value "" para que no se vea el texto y si no esta
> casado aparecerá el bitmap 1
>
> Si quieres que cambie al hacer clic en una línea tendrñas que utilizar
> el evento OnClick para cambiar el valor del campo asignado a la columna
> y con eso cambiará el bitmap el solito.
>
> Facil no?
>
> Salu2
>
>
Eres un superdotado, bién me lo decia Rene Flores cuando estuve en su curso.
Te agradezco todo el apoyo que siempre me has dado
Gracias
Ing. Guillermo Guevara Carrillo
"Bingen Ugaldebere" <bingen@muninser.com> escribió en el mensaje
news:480e325d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> No puedes poner un checkbox directamente pero la manera de hacerlo es
> usando 2 bitmap de 16 bits con el Checkbox marcado y desmarcado.
>
> Yo uso dos luces verde y roja que te adjunto.
>
> Para ello has de crear el DbfBrowse y en su oImageLIst añadir ambos
> bitmaps, después al crear la columna que quieres que aparezca con el
> CheckBox le añades un campo como de costumbre y saldrña su valor, luego
> vas a su evento OngetData y escribes algo parecido a esto dependiendo
> del campo que quieras controlar
>
> METHOD DBBrowse1Column6GetData( oSender, Value, nImage ) CLASS
> TFormClientes
>
> If Value="Casado"
> nImage := 2
> Value :=""
> Else
> nImage := 1
> Value :=""
> Endif
>
> RETURN Nil
>
> De esta forma el campo que en origen ponía "Casado" ahora aparecera con
> el bitmap 2 y el value "" para que no se vea el texto y si no esta
> casado aparecerá el bitmap 1
>
> Si quieres que cambie al hacer clic en una línea tendrñas que utilizar
> el evento OnClick para cambiar el valor del campo asignado a la columna
> y con eso cambiará el bitmap el solito.
>
> Facil no?
>
> Salu2
>
>