Créer une visionneuse de fichier quickreport...

Question

Bonjour,

J'aimerais créer une visionneuse de fichier quickreport.
Le fichier exe se présentera comme "adobe acrobat" et je souhaiterais que le fichier ".QRP" s'éxécute automatiquement avec le fichier .exe contenant un report.
Pour cela je me doute qu'il failel tout d'abord une association fichier/application mais après...
Je ne sais pas comment faire pour que la visionneuse accepte directement le fichier "*.QRP" après avoir cliqué dessus.

Si quelqu'un pouvait m'aider...

Merci.

Orélien.

cs_Delphiprog · Answer

Tu charges un fichier .qrp dans le composant TQrPreview et tu obtiens instantanément l'affichage.

Le système te passera le nom du fichier double cliqué en argument qu'il te suffit de lire (ParamStr(1).) après vérifié que ParamCount (vérification du nombre d'argument reçus) soit supérieur à zéro.

cs_orelien · Answer

Merci, mais sincèrement je n'ai pas bien tout saisi...

J'ai bien placé le composant TQrPreview mais après je suis perdu, je ne trouve pas le moyen de charger le fichier "*.QRP"...

Aurais tu un exemple à m'indiquer ?
Merci
Orélien.

cs_Delphiprog · Answer

Voici un code qui fonctionne dans la réalité et qui correspond à ta question :

procedure TDlgChoixImpression.btnOpenSavedReportClick(Sender: TObject);
begin
  //Prévisualisation ou impression d'un état enregistré sur disque
  with TOpenDialog.Create(Application) do
  begin
    Title := sOpenAReport;
    Filter := 'Etats QuickReport (*.QRP )|*.QRP';
    Options := Options + [ofFileMustExist, ofPathMustExist];
    if Execute then
      if FileExists(FileName) then
        with TQrPrinter.Create do
        begin
          Load(FileName);
          if cbxPreview.Checked then
            PreviewModal
          else
          begin
            Print;
            Free;
          end;
        end
      else
        ShowMessageFmt(sFileNotFound, [FileName]);
  end;
end;

Ce code sert à charger le fichier .QRP dans un TQrPrinter et soit en demander la prévisualisation, soit l'impression directe.

cs_orelien · Answer

Merci ça fonctionne chez moi mais ce que je voulais à la base c'est savoir comment créer un lien entre le quick report (exe) et le fichier ".QRP". J'aimerais que lorsque l'on clique sur ce fichier le programme report.exe s'ouvre automatiquement avec le .qrp chargé et prêt à êter imprimé ou simplement visionné...

Merci de ton aide...
Orélien.

Créer une visionneuse de fichier quickreport...

4 réponses

Votre réponse

Discussions similaires