Картинки в FastReport 2.45

← →
Luc (2003-02-17 07:23) [0]

Есть две картинки - одна Art_Pict типа TImage на форме, вторая типа TfrPictureView в отчете. Очень хочется подсунуть картинку с формы в отчет. По OnBeforePrint пробовал делать:

(View as TfrPictureView).Picture.Assign(Art_Pict.Picture);

И в отчете ничего не отображается... Подскажите плиз, где грабли?

← →
alxx © (2003-02-17 10:09) [1]

А так пробовал?

(frReport1.Pages[0].FindObject("Название_объекта_картинки") AS TfrPictureView).Picture.Assign

← →
Luc (2003-02-17 11:23) [2]

да я итак по OnBeforePrint проверку делаю View.Name = "Название_объекта_картинки" и поэтому во View подсовывается именно этот объект. т.е. делаю то-же что и ты написал, просто по-другому. а картинка в отчете все одно не отображается...
такое ощущение, что она может отображать только BLOB-поля из таблицы....

← →
alxx © (2003-02-17 12:30) [3]

Реально работающий код. Но он с файлом. Все это выполняется перед ShowReport.

RPic:=TfrPictureView(Rep2.Pages.Pages[0].FindObject("Picture2")); If RPic = nil Then Exit; RPic.Picture.LoadFromFile(ExtractFilePath(Application.ExeName)+"Photo.bmp");

Была такая же проблема. Пришлось рисовать промежуточный битмап, а с него уже делать FRPic.Picture.Bitmap.Assign

Картинки в FastReport 2.45 Найти похожие ветки