Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 18-03-2015
Avatar de santiago14
santiago14 santiago14 is offline
Miembro
 
Registrado: sep 2003
Ubicación: Cerrillos, Salta, Argentina
Posts: 585
Poder: 23
santiago14 Va por buen camino
Question

Ahhh, el ejemplo que pusiste funciona porque lo estás haciendo en el TForm1.
Lo que yo digo es dentro de la estructura de FastReport (PascalScript)
Transcribo lo que tengo:

En un DataModule tengo un frxReport (frxTapaBoletinViejo), entrando a él quiero hacer que FastReport me cuente que caja de texto ha sido impresa, de ahí que me pareció lo mas adecuado que eso salga a través de EventLog de Delphi.

Esto es lo que tengo en el DataModule
Código Delphi [-]
unit dmReportes;

interface

uses
  System.SysUtils, System.Classes, frxRich, frxClass, sRichEdit,
  Vcl.ExtCtrls, frxDBSet, FireDAC.Stan.Intf, FireDAC.Stan.Option,
  FireDAC.Stan.Param, FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf,
  FireDAC.DApt.Intf, FireDAC.Stan.Async, FireDAC.DApt, Data.DB,
  FireDAC.Comp.DataSet, FireDAC.Comp.Client, frxExportPDF, frxExportRTF,
  Datasnap.Provider, Datasnap.DBClient, frxDesgn, dataModule, frxExportText,
  Winapi.Windows;

type
  TdtmReportes = class(TDataModule)
    
    frxTapaBoletinViejo: TfrxReport;
    
  private
    { Private declarations }
  public
    { Public declarations }

  end;

var
  dtmReportes: TdtmReportes;

implementation

{%CLASSGROUP 'Vcl.Controls.TControl'}

{$R *.dfm}


end.

Ahora bien, entro en el frxReport (Edit report), me aparecen las herramientas de edición propias de FastReport.

Y en la parte de código (code), es donde intento poner el código que he puesto en post's anteriores.

Dentro de la pestaña Code he puesto lo siguiente:
Código Delphi [-]
uses 
  System.SysUtils;                                                                                    
   

procedure avisoCOMPROBANTEOnAfterPrint(Sender: TfrxComponent);
begin
  OutputDebugString('Hola');                                                        
end;

begin

end.

Al intentar correrlo, el error es "Identifier expected" y el cursos se posiciona en la "S" (la primera) de System.SysUtils

En el formulario FastReport solament tengo una cajita de texto "AvisoComprobante" que es un Memo común de FastReport.
__________________
Uno es responsable de lo que hace y de lo que omite hacer.

Última edición por santiago14 fecha: 18-03-2015 a las 14:37:23.
Responder Con Cita
 


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
Paso de parámetros en FastReport o acceder a un label de un fastreport desde asp.net mamen Impresión 1 22-03-2012 15:29:23
FastReport DANNY777 Varios 3 30-10-2006 16:44:31
Pasar de FastReport 2 a FastReport 3 David Impresión 1 18-08-2006 18:14:23
FastReport scooterjgm Impresión 0 22-11-2004 16:17:44
FastReport CLX rvinfo Impresión 2 01-10-2003 13:34:02


La franja horaria es GMT +2. Ahora son las 21:43:32.


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