Einzelnen Beitrag anzeigen

Mario

Registriert seit: 7. Apr 2003
567 Beiträge
 
Delphi 2006 Enterprise
 
#2

Re: Viewer für Quickreport-Dateien

  Alt 25. Sep 2003, 08:28
Hallo,

ich habe mir mal eine DLL geschrieben, die ich immer dann aufrufe, wenn ich eine alte QR-Version nur zur Anzeige laden will. Das kannst Du auch problemlos in eine Exe einbauen:

Delphi-Quellcode:
library QROldShow;

uses
  SysUtils,
  Classes,
  QrBonus;

procedure ShowReport(aFileName: PChar);
BEGIN
 with TQRPHandler.Create do
 begin
  try
    Filename := aFileName;
    Preview;
  Except
    On E:Exception DO ShowException(E,@ShowReport);
  end;
  Free;
 end;
END;

exports
  ShowReport;

begin

end.
Schöne Grüße,
Mario Noack
  Mit Zitat antworten Zitat