Qreport da resimleri gosterme

[erdogan_ozkaya]

Arkadaşlar,
bende bir klasörde üylerin resimlerini saklıyorum jpg olarak. Üyelerimde veri tabanında. Her üyenin eğer girilirse bir resmi oluyor (üye kayıt no ile kaydediyorum jpg olarak). Ben quicreportta üyelerin raporunu alırklen üyenin resmi girildiyse o üyenin resminin de görüğnmesini istiyorum. detayıl banda üye bilgileri ve imaj olcak. her üyenin yanında girilen resimlerinde kaydeilen klasörden alınıp gösterilemsini istiyorum. nasıl yaparım. Resimleri üye kayıt no ile kaydettim.
detayıl bandın before print olaytına yazdım kodu olmadı

Kod: Tümünü seç

procedure Tveri.QRBand24BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
var
  MS : TMemoryStream;
  jpegResim : TJpegImage;
begin
if veri.Master_Data.FieldByName('ves_resim_yol').AsString=''
then  else
begin
  MS := TMemoryStream.Create;
  try
    jpegResim := TJpegImage.Create;
    try
      try
      IdHTTP1.Get('http://www.XXXXX.com/resimler/'+veri.Master_Data.FieldByName('ves_resim_yol').AsString, MS);
except
        on e: EIdHTTPProtocolException do begin
            exit;
          end else begin
            raise;
          end;
        end;
      MS.Position := 0;
      jpegResim.LoadFromStream(MS);
      QRImage9.Picture.Assign(jpegResim);
    finally
      jpegResim.Free;
    end;
  finally
    MS.Free;
  end;
end;
end;