Discussion :

[Speed41]

Bonjour,

Je débute avec RAVE et je ne suis pas bien fort en Delphi. Les choses étant dites voici ma question :

Je viens de créer un rapport avec Rave Reports 5.0 dans lequel il y a une image que je voudrais changer depuis mon application delphi.
J'ai bien tenté avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rvproject1.SetParam('p1',extractfilename(application.exename)+'\fouine.bmp');

Mais ça ne donne rien

Je me suis inspiré de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rvproject1.SetParam('HH',edit1.text);

qui fonctionne pour un texte.

Merci de me dire comment faire pour mon image

[CapJack]

Je ne connais rien à Rave, mais le ExtractFileName me paraît surprenant.

Ce ne serait pas plutôt ExtractFileDir ?

[femtosa]

Salut

Je débute également en Rave alors je ne pourrai pas te donner de solution toute faite !

Cependant, lorsque tu fais ton :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rvproject1.SetParam('p1',extractfilename(application.exename)+'\fouine.bmp');

Tu va changer la valeur d'un paramètre 'String' non ? Tu veux afficher le nom de l'image ou l'image en elle-même ?

Si c'est juste le nom de l'image, en prenant en compte la remarque de CapJack ça devrait marcher avec ceci comme code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
  With rvproject1 do
  begin
    try
      Open;
      SetParam('p1',extractfiledir(application.exename)+'\fouine.bmp');
    finally
      Close;
    end;
    ExecuteReport({LeNomDeTonReport});
  end;

En tout cas, quand j'ai essayé de mettre à jour des paramètres et de lancer l'impression de l'état par RAVE (avec 'F9' et mon application lancée derrière) les paramètres n'étaient pas mis à jour. Tandis qu'en lançant l'impression de l'état depuis mon applic, les paramètres étaient corrects ...

Cependant, si tu veux changer l'image en elle-même, peut-être ne devrais-tu pas passé une chaîne de caractère mais l'image elle-même et travaillé avec un composant bitmap dans Rave Report ...

J'espère t'avoir fait avancer de quelques pas

[Rayek]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rvproject1.SetParam('p1',extractfilename(application.exename)+'\fouine.bmp');

Je pense que l'erreur vient du fait que tu n'utilises pas la bonne fonction pour récupérer le chemin de ton image.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
rvproject1.SetParam('p1',ExtractFilePath(application.exename)+'fouine.bmp');

Je pense que comme çà, cela fonctionnera mieux ^^

[edit]

Cependant, si tu veux changer l'image en elle-même, peut-être ne devrais-tu pas passé une chaîne de caractère mais l'image elle-même et travaillé avec un composant bitmap dans Rave Report ...

Ca fonctionne aussi très bien en passant le chemin de l'image par paramètre.

[femtosa]

Ca fonctionne aussi très bien en passant le chemin de l'image par paramètre.

Très bien, voilà qui simplifie les choses ! Merci !

[Rayek]

Très bien, voilà qui simplifie les choses ! Merci !

En utilisant la QR que j'ai faite + le bout de code ci-dessous, que l'on met sur l'évènement OnBeforePrint du composant Image dans l'état, On peut imprimer n'importe quelle image juste en changeant le paramètre.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
function Bitmap1_OnBeforePrint(Self: TRaveBitmap);
begin
  Self.FileLink := RaveProject.GetParam('MONPARAMLOGO');
end OnBeforePrint;

[Speed41]

Ou la la comment je me suis planté je voulais écrire "extracfilepath" mais j'ai du glisser . Désolé pour ça.

Mais voici mon nouveau code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
var t : string;
begin
  RvProject1.Open;
  t:=extractfilepath(application.exename)+'fouine.bmp';
  rvproject1.SetParam('p1',t);

Et surprise ça ne met pas l'image à la place de l'image (P1) dans mon rapport

Le code de Malatar

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
function Bitmap1_OnBeforePrint(Self: TRaveBitmap);
begin
  Self.FileLink := RaveProject.GetParam('MONPARAMLOGO');
end OnBeforePrint;

Ca marche. Super, mais j'aurais jamais trouvé ça tout seul

Merci