Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-04-2018
Jose Roman Jose Roman is offline
Miembro
 
Registrado: Jul 2006
Ubicación: Colombia
Posts: 296
Poder: 13
Jose Roman Va por buen camino
Ver como Boolean un campo en Mysql y Zeos en un DBGrid

Cordial saludo,

Trabajo con MySql, Zeos y Delphi, en un Form tengo un DbGrid el cual muestra los datos de una tabla, dentro de los datos hay un campo TinyInt es el que utiliza MySql como boolean pero este campo lo muestra como 0 y 1, mi pregunta es como mostrar en el dbgrid este campo como Falso o Verdadero o mejor aun SI o NO.

Gracias
Responder Con Cita
  #2  
Antiguo 03-04-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: Dec 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.118
Poder: 30
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Ejemplo:
Código Delphi [-]
...
type
  TForm1 = class(TForm)
  ...
  procedure FormCreate(Sender: TObject);
 private
    procedure DataSetCpoBoolGetText(Sender: TField; var Text: string;
      DisplayText: Boolean);
 ...
 end;

...

implementation

procedure TForm1.FormCreate(Sender: TObject);
begin
  DBGrid1.DataSource.DataSet.FieldByName('BOOL').OnGetText := DataSetCpoBoolGetText;
  // igual sería hacer:
  // ZQuery1.FieldByName('BOOL').OnGetText := DataSetCpoBoolGetText;
end;

procedure TForm1.DataSetCpoBoolGetText(Sender: TField; var Text: string;
  DisplayText: Boolean);
const
  SINO: array[0..1] of string = ('No', 'Si');
begin
  Text := SINO[Sender.AsInteger];
end;
...
Si tenes el campo a mostrar como persistente, podes crear el evento OnGetText en tiempo de diseño desde Fields Editor~Object Inspector .

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #3  
Antiguo 03-04-2018
Jose Roman Jose Roman is offline
Miembro
 
Registrado: Jul 2006
Ubicación: Colombia
Posts: 296
Poder: 13
Jose Roman Va por buen camino
Muchas gracias, genial aporte no podría haberlo resuelto si su ayuda
Responder Con Cita
  #4  
Antiguo 04-04-2018
Avatar de yusnerqui
yusnerqui yusnerqui is offline
Miembro
 
Registrado: Mar 2004
Ubicación: Cuba
Posts: 677
Poder: 15
yusnerqui Va por buen camino
Cita:
Empezado por Jose Roman Ver Mensaje
Muchas gracias, genial aporte no podría haberlo resuelto si su ayuda
Otra idea muy elegante es mostrar la columna estilo checkbox como nos comentan en este hilo los amigos del foro

http://www.clubdelphi.com/foros/showthread.php?t=12672

Saludos
__________________
Lo importante no es llegar primero, sino saber llegar.

Para que puedas llegar mejor lee la Guia de Estilo

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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
MySql con ADODB boolean dfarias Conexión con bases de datos 2 19-03-2009 20:39:37
Campo Boolean salga SI o NO tarco35 Conexión con bases de datos 3 16-02-2007 23:10:17
CheckBox y campo Boolean Nbull MySQL 2 01-02-2006 16:45:17
Campo Boolean en Interbase jgutti Firebird e Interbase 11 14-11-2005 10:43:28
Actualización de campo Boolean PINO72 Firebird e Interbase 1 09-02-2005 21:28:21


La franja horaria es GMT +2. Ahora son las 09:41:13.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi