Programın kurulu olmadığı bir PC'de kaydedilmiş rapor önizleme dosyasını (dizayn dosyası değil) açar.Örneğin bir stok listesi yada müşteri listesini önizleme ekranında dosyaya kaydedip mail ile başka bir yere gönderdik ve burada program kurulu değil,bu önizleme dosyasını nasıl açıp görebiliriz?

FastReport Rapor Önizleme Dosyası uzantısı:  .fp3

FreeReport Rapor Önizleme Dosyası uzantısı:  .frp

QReport Rapor Önizleme Dosyası uzantısı:     .qrp


Kayedilmiş önizleme dosyası  Preview.exe üzerine sürükleyip atarsanız dosya açılacaktır.Önizleme dosyasını çift tıklayıp açmak isterseniz , bu durumda dosyanın kendisini açacak exe'nin belirtilmesi gerekir.

"Birlikte Aç->Listeden Program Seç->exe dosyasını Program listesine Ekle"  , "Bu tür dosyaları açmak için her zaman seçili programı kullan"  işaretli olsun.


FastReport:
procedure TForm1.FormCreate(Sender: TObject);
begin
   if paramstr(1) <> '' then
   begin
      frxReport1.PreviewPages.LoadFromFile(paramstr(1));
      frxReport1.ShowPreparedReport;
      PostMessage(Self.Handle, WM_Close, 0, 0);   //formu kapat
   end
   else
   begin
      frxReport1.ShowPreparedReport;
      PostMessage(Self.Handle, WM_Close, 0, 0);  //formu kapat
   end;

end;


FreeReport: (Rapor adlı ayrı bir form kullanılmaktadır)
procedure TForm1.FormCreate(Sender: TObject);
begin
   if paramstr(1) <> '' then
   begin
      frmRapor.frReport1.LoadPreparedReport(paramstr(1));
      frmRapor.frReport1.ShowPreparedReport;
      PostMessage(Self.Handle, WM_Close, 0, 0);   //formu kapat
   end
   else
   begin
      frmRapor.frReport1.ShowReport;
      frmRapor.Show;
      PostMessage(Self.Handle, WM_Close, 0, 0);  //formu kapat
   end;
end;


QReport:
procedure TForm1.FormCreate(Sender: TObject);
begin
   if paramstr(1) <> '' then
   begin
      quickrep1.Prepare;
      quickrep1.qrprinter.load(paramstr(1));
      quickrep1.QRPrinter.PreviewModal;
      PostMessage(Self.Handle, WM_Close, 0, 0);   //formu kapat
   end
   else
   begin
      quickrep1.Prepare;
      quickrep1.Preview;
      PostMessage(Self.Handle, WM_Close, 0, 0);  //formu kapat
   end;
end;


Her 3 örnek uygulamayı ektedir.