Cita:
Empezado por pelecho
Hola a todos,
ya que se toca el tema del destroy en formularios, tengo un pequeño inconveniente con lo reportes, usando el Report (File->New..., luego en la pestaña New hay un formulario Report). Cuando llamo el evento AfterPreview, no me lo ejecuta. Necesito destruir el informe, ya que lo construyo solamente para imprimir un reporte.
Alguien tiene una idea como solucionarlo? Necesito destruir el formulario de reporte de todos modos.
|
Hola pelecho.
Primero quitá QuickReport2 (o el nombre que le diste al report) de la lista en: Project -> Options -> Forms -> Auto-create forms.
Luego desde el form que deseas invocarlo una opción sería por ejemplo:
Código Delphi
[-]
...
implementation
uses Unit2;
procedure TForm1.Button1Click(Sender: TObject);
begin
with TQuickReport2.Create(nil) do
try
...
Preview;
finally
Free;
end;
end;
...
Si deseas que dure lo que la vida del form invocador, podrías hacer:
Código Delphi
[-]
...
implentation
uses Unit2;
procedure TForm1.FormCreate(Sender: TObject);
begin
QuickReport2:= TQuickReport2.Create(Self); end;
...
Saludos.