error de CheckBox en DBGrid
Hola amigos buenas tardes.
USO DELPHI 6 y FIREBIRD 2.0 Ando buscando la forma de usar un checkbox dentro de un DBGrid, ya he investigado y tengo el siguiente codigo:
Y aqui hago un click en el DBGrid para cambiarle el estado del campo "Surtido".... La bronca q tengo en este punto es que cuando le doy click....el checkbox desaparece y se pone el cursor en espera de registrar algo....le registro la letra 'N' y me aparece el checkbox marcado. Oh, antes q nada el campo "Surtido", tengo registrado una "S" para cuando se haya surtido el producto y una "N" para cuando no. Les comento que cuando abro el DataSet (IBDataSet), me muestra los checkbox en un inicio marcados todos cuando sea nulo o bien tengan una "N"....lo anterior es para ahorrarle tiempo al usuario y no se agarre marcando de uno por uno aquellos productos que fueron surtidos...en fin, es por comodidad. Pero el problema es que el usuario debera regstrar una "S" para que el Checkbox cambie a UNCHECKED....y no quiero eso...quiero CHECKEAR Y DESCHEKEAR en el objeto CheckBox creado del DBGrid. He probado con el componente CheckListBox y este hace lo que quiero....pero aqui tengo un incoveniente que no se como lo pudiera resolver. Al mismo tiempo que el usuario registre los productos que no fueron surtidos, registre una nota en un campo Memo del la base de datos dle motivo del NO SURTIMIENTO, aqui se me ocurrio solucionarlo con un TMemo....pero y cuando sean mas de 1 producto no surtido?....como le hago?....SE ACEPTAN SUGERENCIAS...!!! Bueno en fin, ya logre pintar un checkBox dentro del DbGrid y agregue un componente DBMemo el cual lo tengo ligado obviamente al DataSet del DBGrid, pero la bronca q tengo ahora es....que el checkox cambia su estado siempre y cuando le registre una "S" o un "N" en la columna "Surtido"....como le hago para que no me haga esto????? Espero haberme explicado. Agradezco su comentarios y su ayuda. Saludos. |
|
Si ya vi ese ejemplo
Cita:
Si ecfisa, ya vi ese ejemplo. Pero al parecer es para campos boleanos....yo trabajo con Firebird 2.0 y ahi no hay campos boleanos. De hecho tengo un campo donde almaceno una "S" para identificar los pedidos que fueron surtidos y una "N" para los que no están en el supuesto. En realidad no se como aplicarlo a mi codigo....veo q maneja un componente DBCheckBox....yo no lo uso....dejame probarlo. |
Hola Miguel.
No es necesario que el campo sea booleano, para eso están las propiedades ValueChecked y ValueUnChecked del TDBCheckBox: El resto del código sólo necesita unos cambios menores.
Saludos :) |
Agradezco Daniel tu respuesta....en estos momentos estoy probando el codigo. También me guiaré con lo q me comentas....
Nuevamente agradezco tu tiempo. Luego les cuento como fue...y publico el código final. Saludos. |
oK...Excelente...ya lo probe y funciona al 90%...jajajaja...es que el checkbox se "pinta" tambien afuera del DbGrid1.
Checaré mas a fondo el código para solucionarlo....para mi q va a ser donde esta el codigo del procedimiento DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); Lo checo y les comento |
1 Archivos Adjunto(s)
Evento DrawColumnCell del DBGrid
Evento CellClick del DBGrid Las imagenes q dibujo ... |
Ok gracias juanlaplata por tu colaboración.
No estoy trabajando con imagenes, pero es otra opción que exploraré y ver que tan efectivo es para mi aplicación....si es lo que se necesita. Te agradezco tu tiempo. |
La franja horaria es GMT +2. Ahora son las 03:21:29. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi