[CR] Inserer une image à partir d'un fichier [Résolu]

[Gandalf24]

Hug a tous
Encore un pb sur crystal que je n'arrive pas à résoudre :
Dans mon détail, j'ai (éventuellement) un chemin d'un fichier image.
=> Comment inserer une image ds un detail à partir d'un nom de fichier ??

Merci d'avance

[franck.cvitrans]

Bonjour à vous.

Moi aussi je suis confronté au même problème.Je sais quelle image à insérer dans mon document.
J'ai le nom de l'image dans ma base de données et je voudrais l'insérer dynamiquement...

Merci pour toute aide

[sur_uix]

Sur ce cou il vas faloir coder (EN VB ou Delphi).
Moi j'ai fais cela en Delphi, avec redimmensionement de l'image en fonction du rapport H/l, lissage, etc... Au final ,'est très beau et les utilisateur aime bien ce genre de petiti plus.

Alors voilà.

Prendre un oignon.....


Non bon je vous donne la solution officelle de Crystal

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Solution
 
TO CHANGE an image at runtime SET the FormattedPicture property of the OLE Object (Object Type SET TO Bitmap), OR Picture Object USING the Microsoft Visual Basic FUNCTION LoadPicture. 
 
The filepath parameter of the LoadPicture FUNCTION can be a string, a variable , OR a FIELD value. 
 
IN this example the filepath IS FROM a FIELD value: 
 
The report has three FIELDS FROM the Employee TABLE AND an OLE Object (Object Type SET TO Bitmap), OR Picture Object IN the Detail section. Field1 IS the 'Employee Name' FIELD, Field2 IS the 'Last Years Sale's' field, and Field3 is the path to the bitmap of the employee's picture. Field3 IS suppressed because only the FIELD value IS needed TO LOAD the picture. 
 
This code applies TO Section Format Events IN a DSR. 
 
'Section 3 is the detail section
Private Sub Section3_Format(ByVal pFormattingInfo As Object)
 
  'Pass the path FROM field3 TO the Visual Basic LoadPicture FUNCTION. 
'The picture is then loaded into the OLE Object
Set Picture1.FormattedPicture = LoadPicture(Field3.Value)
 
End Sub
 
Note: When exporting the report the Section Format event is not executed resulting in the updated image not being exported..

Si cela ne vous suffit pas je peux vous en dire plus.

[franck.cvitrans]

bonjour,

Je voudrai connaitre la manière d'utiliser ce code.

Développeur C++ Builder j'ai essayer de l'exploiter avec le composant ActiveX ou le composant VCL de crystal report.Mais je n'arrive pas à utiliser ce code.

Où doit on utiliser ce code? dans les fomules ?....

Merci pour vos réponses

[sur_uix]

Ce code est valable en VB avec le composant ActiveX (craxdrt.dll)

Il faut le transposser en C++ Builder.

Mais en aucun cas ce code est ne doit être dans le rapport.

[Gandalf24]

En tt cas merci pour les infos
Salutations
A +

[yoloosis]

Je suis néophyte dans le monde de la prog windows...
La question est peut-être bête, mais peut-on utiliser ce code sans C++-Builder ? Je n'ai que CR7 + Office (dans lequel je trouve un Visual Basic Editor). Je peux utiliser ceci ?
Merci !
yoloosis

[sur_uix]

Je ne suis pas expert VB dans Office mais je ne pense pas. Il te faut un vrai environnement de développement pour utiliser ce code.