Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-05-2004
yeseniahdz yeseniahdz is offline
Registrado
 
Registrado: may 2004
Posts: 5
Poder: 0
yeseniahdz Va por buen camino
Question Como relacionar un checkbox a un campo de tipo smallint

Hola

Tengo una tabla en Firebird asociada a una forma en delphi (Delphi 7), dentro de la forma hay una rejilla (la cual se relaciona directamente con la tabla), y hay varios controles (uno por cada campo, para facilitar la captura de datos), uno de los controles es un TDBCheckBox y esta asociado con un campo dentro de la rejilla que es de tipo SmallInt.

Ahora bien segun me explicaron (por que yo apenas voy iniciando en la programación en delphi) debería ser un campo de tipo lógico (boolean), pero como en bases de datos SQL estándar (como Firebird) no existen estos campos se utilizan los de tipo SmallInt.

Me parece que se utilizan los manejadores de evento OnGetText y OnSetText del campo persistente para hacer la conversion; el problema es que no se como hacerlo (la conversión).

De antemano agradezco la ayuda que puedan brindarme .
Responder Con Cita
  #2  
Antiguo 26-05-2004
sanxpue sanxpue is offline
Miembro
 
Registrado: jul 2003
Posts: 196
Poder: 21
sanxpue Va por buen camino
Lightbulb Haber..

Haber si te sirve esta liga si no..ahi avizas

http://www.clubdelphi.com/foros/show...light=checkbox
__________________
saludos desde Puebla Mexico..
asanxt@hotmail.com
"como siempre a sus ordenes y siempre con buena cara"
'lolita me excitas, perversa piel de melocotón'
Responder Con Cita
  #3  
Antiguo 27-05-2004
yeseniahdz yeseniahdz is offline
Registrado
 
Registrado: may 2004
Posts: 5
Poder: 0
yeseniahdz Va por buen camino
Antes que nada gracias por la ayuda brindada

Leí el hilo y si me dio nocion de lo que tenía que hacer, pero mi problema quedó resuelto de la siguiente manera:

En el evento OnSetText del campo
Código:
 
If Text ='True' Then 
  NombreTablaNombreCampo.Value :=1
Else
  NombreTablaNombreCampo.Value :=0;
y en el evento OnGetText del campo
Código:
 If NombreTablaNombreCampo.Value = 1 Then 
   Text :='True'
 Else
   Text :='False';
De esta manera ya trabaja de manera correcta.
Gracias nuevamente
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:09:03.


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
Copyright 1996-2007 Club Delphi