Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-11-2006
VNNO VNNO is offline
Miembro
 
Registrado: ago 2006
Posts: 15
Poder: 0
VNNO Va por buen camino
Unhappy Ayuda con el Quick Report

Salu2:

He revisado este hilo
http://clubdelphi.com/foros/showthre...ht=quickReport

Pero resulta que en la solucion que proponen mi qrbdtext no tengo el evento BeforePrint al que hacen alucion solo tengo el evento Print, El beforeprint solo lo encuento en el QR. Alguien me puede decir q estoy haciendo mal porfa.

Mi problema es el mismo tengo en mi base de datos un campo q es Booleano y me sale en ingles la respuesta False-True, lo que necesito hacer es q en vez de eso me salga Si/no segun la respuesta de este.

Le agradezco su ayuda..... una cosa mas mi consulta la estoy haciendo por codigo en una forma antes de donde tengo el QR, debido a q necesito capturar el valor por el cual quiero hacer la busqueda....Todo lo estoy haciendo por codigo en un boton, no en el SQL del Query

Mi base de datos es Acces y Trabajo con ADO

Responder Con Cita
  #2  
Antiguo 01-12-2006
mez mez is offline
Miembro
 
Registrado: feb 2006
Posts: 11
Poder: 0
mez Va por buen camino
Smile

tienes que poner tu codigo en el evento BeforePrint de tu QReport, cuando venga un TRUE, puedes desplegar un string con el valor "SI" y cuando venga un FALSE despliegas el string con valor "NO"


PROCEDURE TQRInforme.QuickRepBeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean);
VAR
Despliega:string;
BEGIN
if MiBaseADO.fieldbyName('CAMPO1').AsBoolean then
Despliega:='SI'
else
Despliega:='NO';

PrintReport:=TRUE;
END;

Eso es, según entendí tu problema.
Responder Con Cita
  #3  
Antiguo 02-12-2006
luisgutierrezb luisgutierrezb is offline
Miembro
 
Registrado: oct 2005
Ubicación: México
Posts: 925
Poder: 20
luisgutierrezb Va por buen camino
Otra cosa que se puede hacer es crear un campo calculado por ejemplo boolStr, y en el evento onCalcFields le pones

Código Delphi [-]
If Dataset['CampoBoolean'] Then
  Dataset['BoolStr'] := 'SI'
else
  Dataset['BoolStr'] := 'NO'
Responder Con Cita
Respuesta



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
Quick Report delphi 4 o Crystal Report Mauricio Correa Impresión 7 05-02-2011 15:57:40
Ayuda con Quick Report y un dbGrid Gangster Impresión 1 08-11-2006 07:57:34
Ayuda con Quick REport raco Impresión 6 27-10-2005 21:59:48
diferentes paginas en quick Report, ayuda manolop Impresión 5 30-05-2005 20:48:58
Urge ayuda en Quick Report 3.6 r_urbina Impresión 0 05-11-2004 01:45:44


La franja horaria es GMT +2. Ahora son las 01:40:55.


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