TCheckBox + SQL
Publicado: Mar Jun 12, 2007 12:43 am
Estoy haciend pruebas con SQL + Xailer, y tengo un problema:
Como no acepta SQL campos logicos los cambie por campos Char(1), pero en el TDBCheckBox me marca error, hice un seguimiento y encontre que es en el SetChecked() de XCheckBox, pero como el methodo es protegido, veo que no me lo sustituye por el que sobrecargue, lo unico que le anexe es:
IF Valtype( lValue ) == "C" //parche para trabajar con SQL
lValue := ( lValue == "S" )
ENDIF
para poder usar los campos logicos como Char(1), y el error persistio, aunque veo que lo tienen previsto para uso en caso de mandar un valor Numerico, y lo resolvi usando un Campo SmallInt inicilizado a Cero, pero, en si, requiero usarlo en Char(1).
Se puede anexar este pedazo de codigo?
Gracias.
--
Ramón Zea
01.993.194.14.27
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
--
Como no acepta SQL campos logicos los cambie por campos Char(1), pero en el TDBCheckBox me marca error, hice un seguimiento y encontre que es en el SetChecked() de XCheckBox, pero como el methodo es protegido, veo que no me lo sustituye por el que sobrecargue, lo unico que le anexe es:
IF Valtype( lValue ) == "C" //parche para trabajar con SQL
lValue := ( lValue == "S" )
ENDIF
para poder usar los campos logicos como Char(1), y el error persistio, aunque veo que lo tienen previsto para uso en caso de mandar un valor Numerico, y lo resolvi usando un Campo SmallInt inicilizado a Cero, pero, en si, requiero usarlo en Char(1).
Se puede anexar este pedazo de codigo?
Gracias.
--
Ramón Zea
01.993.194.14.27
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
--