Voila une procedure trouvé sur www.developpez.com
faite par SergioMaster que j'ai adapté est c'est parfait
// Importe l'image de l'article dans un fichier JPG et l'importe a Rave en BMP
procedure TDM.RvDataSetConnectionArticleValidateRow(
Connection: TRvCustomConnection; var ValidRow: Boolean); //crée le 28.03.2009,
// source sur le forum rave developpez.com par SergioMaster
var
MyPage: TRavePage;
RaveBitmap : TraveBitMap;
ImageJPEG : TJpegImage;
NomImage, Extension : string;
jpeg:Boolean;
begin
MyPage := RvProjectAttribArt.ProjMan.FindRaveComponent('ReportArticle.page1',nil) AS
TRavePage;
RaveBitmap := RvprojectAttribArt.ProjMan.FindRaveComponent('bitMap1',MyPage) As
TRaveBitMap;
NomImage:=Uppercase(IBQuery_ArticleART_FHR_IMG.Value);
Extension:=ExtractFileExt(NomImage);
jpeg:=(trim(Extension)='.JPG');
if fileExists(NomImage) then
begin
if assigned(raveBitMap) AND jpeg then
begin
imageJPEG := TJPEGImage.Create;
try
imageJPEG.LoadFromFile(NomImage);
ImageJPEG.DIBNeeded;
RaveBitMap.Image.Assign(ImageJPEG);
finally
ImageJPEG.Free;
end;
end
else begin
RaveBitmap.Image.LoadFromFile(NomImage);
end;
end
else RaveBitMap.Image:=nil;
end;
Patrick