PDA

View Full Version : دطونه می توان توی Report عکس نمایش



nasr
جمعه 19 دی 1382, 22:44 عصر
أقا سلام
من یک Report ىلفی ساختم که می خواهم توی اون یک سری عکس نشون بىهم

البته محل عکسها توی یک Fild است مثل F:\Pic\photo1.jpg
خیلی احتیاج است
با تشکر

DataMaster
شنبه 20 دی 1382, 07:44 صبح
ای بابا نگفتی که با چی کار کردی؟ Fastreport یا QuickReport
اینها برای Fastreoprt هست
راه اول بارگذاری توی کد دلفی

procedure TForm1.Button1Click(Sender: TObject);
Var
Page: TfrPage;
v1: TfrPictureView;
v: TfrView;
begin
frReport1.LoadFromFile('Untitled.frf');
Page:=frReport1.Pages[0];
v1:=Page.FindObject('picture1') as TfrPictureView;
v1.Picture.LoadFromFile('E:\My Pictures\Art\0008.jpg');
frReport1.ShowReport;
end;

راه دوم استفاده از اسکریپت خود Fastreport که فعلا نمی دونم :P

nasr
شنبه 20 دی 1382, 21:12 عصر
سلام
خیلی ببخشید که ذکر نکرده بودم
من با QuickReport کار می کنم
آقا اگه جواب این سوال رادادید لطفا بگید چگونه میشه یک Find And Replase که توی جدول کار کنه مثل برنامه های آفیس (اکسس)درست کرد
خسته شدم از بس که از همه پرسیدم ولی کسی جواب به من نداد
با تشکر

nasr
جمعه 03 بهمن 1382, 03:25 صبح
آقامن یک جدول دارم که در آن اسم دانش آموزان و عکس آنها وجود دارد البته در یک فیلد String آدرس عکس روی هارد ذخیره شده مثلا .d:\pic\ali.jpg
حالا می خواهم یک گزارش از اینها تهیه کنم
لطفا راهنمایی کنید

Kambiz
جمعه 03 بهمن 1382, 03:44 صبح
یک QRImage روی Band بنداز و تو OnBeforePrint مربوط به ‌Band مسیر تصویر رو از فیلد بگیر و تصویر رو داخل QRImage بار کن.

nasr
شنبه 04 بهمن 1382, 06:35 صبح
من اینکار را کردم ولی توی تمام Image ها هون عکس اول را نشان می دهد
یعنی همه عکسها فقط مربوط به رکورد اول است

(امید)
شنبه 04 بهمن 1382, 07:55 صبح
اگه برای هر رکورد یک گزارش داری می تونی از این کد استفاده کنی


qrimage1.Picture.LoadFromFile(ado_find.fieldvalues['photo']);

photo مسیر عکس مونه