Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Consulta sobre Freereports (https://www.clubdelphi.com/foros/showthread.php?t=39295)

Manuel 16-01-2007 15:05:31

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.

ContraVeneno 16-01-2007 16:25:22

¿la función formatfloat no te sirve?

Manuel 16-01-2007 16:26:51

Pero donde coloco eso en freereports

ContraVeneno 16-01-2007 16:39:34

supongo que en el evento beforeprint de tu reporte:

Value:=FormatFLoat('#,##0.0', value);

pero al ser tu el que hace el sistema, deberías tener una mejor idea de cuando hacerlo.

;)

Manuel 16-01-2007 16:43:05

Cita:

Empezado por ContraVeneno
supongo que en el evento beforeprint de tu reporte:

Value:=FormatFLoat('#,##0.0', value);

pero al ser tu el que hace el sistema, deberías tener una mejor idea de cuando hacerlo.

;)

Freereport no tienen ese evento, y ademas y además con esto FormatFLoat('#,##0.0', value), los valores que vienen en 0 saldrían igual como 0,0

ContraVeneno 16-01-2007 16:52:45

... ok ...


La franja horaria es GMT +2. Ahora son las 04:58:51.

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