Ver Mensaje Individual
  #1  
Antiguo 16-01-2007
Avatar de Manuel
Manuel Manuel is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz/Chile
Posts: 324
Reputación: 24
Manuel Va por buen camino
Consulta sobre Freereports

Hola amigos del club, estoy desaarrollando un informe en freereports, esta casi terminado pero he chocado con algunos detalles que no he podido superar, trabajo en quickreports, pero por un problema de impresión de las hojas legales en forma horizontal, he decido hacerlo en este otro reporteador, pero es otra historia. Ahora mi problema es el siguiente, este reporte informa de calificaciones con este formato "0.0", todo bien hasta que sucede lo siguiente que una calificación venga vacía o sea en 0 (cero), me imprime en 0,0, para solucionar esto realizó lo siguiente en el evento onprint.

Código Delphi [-]
procedure TFActas2.QRDBText29Print(sender: TObject; var Value: String);
begin
if value = '0.0' then value := ''
   else if value = '-1.0' then value := 'Ex.'
end;

no tengo problemas, pero como hago algo similar en freereports?, gracias por su ayuda amigos.
__________________
Manuel Muñoz L. Trabajando con delphi 7.0 , migrando sistema a Delphi XE8, matando BDE y pasando FIREDAC.
Responder Con Cita