我是這樣查找圖片的,但總是出最後一張圖片呀?fastreport |
答題得分者是:hahalin
|
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
我是這樣查找圖片的,但總是出不了圖片呀? 在master表中有一個companyname field,detail表中有一個kind field,
我通過這兩個field的值來查找圖片的 procedure Tmainform.frReport1BeginPage(pgNo: Integer);
var
picf:string;
begin
picf:='t:\' trim(wwdbcombobox2.Text) '\' trim(wwdbedit6.Text) '.jpg';
if fileexists(picf) then
(frreport1.FindObject('Picture1') as Tfrpictureview).Picture.LoadFromFile(picf)
else
(frreport1.FindObject('Picture1') as TfrpictureView).Picture:=nil; end;
但圖片就是出不來,出錯!
(每個detail表中的每一筆數據都對應的有一圖片的,但要通過過主表的companyname與detail表中的kind要顯示圖片于fastreport中的picture中)
不知如何辦才好! IMPROVE FOREVER
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
你只有附上報表檔跟資料庫, 資料庫找到兩個table shipmentbillmain,shipmentbilldetai 報表檔對應的datamodule檔案沒有一起附上來, preview會出現錯誤 an error occured during calculating [dm.adodatasetmain."auditperson"] report:fastreport1 object:memo11... 移掉換memo13 還有,報表中相關的caption是簡體字....-____- 這樣不好查喔...Fear is the path to the dark side. Fear leads to anger.Anger leads to hate.Hate leads to suffering.... |
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
建立資料庫後 依據你的datamodule跟fastreport檔案建立一個測試project 執行時會出現 對於 picture1的access violation 根據fastreport的help指出 function FindObject(Name: String): TfrView; findobject的回傳值是tfrview類型 而再查tfrview Description
This object is parent for all visual objects of FR. 可以知道tfrview是tfrpictureview的父類別. 我檢驗的結果如上,很抱歉不能解決你的問題,我很好奇你的還可以
show一張同樣的圖片,是不是你在設計報表的時候就指定一個圖檔
來檢驗排版用的.
Fear is the path to the dark side.
Fear leads to anger.Anger leads to hate.Hate leads to suffering.... 發表人 - hahalin 於 2003/04/15 23:18:31
|
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
引言: (frreport1.FindObject('picture1') as Tfrpictureview).Picture.Graphic:=mainform.Image1.Picture.Graphic;如果你這樣可以,那也就是說,在form上拉一個dbimage,去對應資料庫的圖片 欄位, 也就是說,你在adodataset新增一個calculated field,type設為blob. 在adodataset的oncalculate事件去動態存入這個欄位,就可以解了. 不知道這個方式你能否接受. 或是,一百零壹招,開個報表資料庫,就解決了,或是clientdataset也可以, 費事了點. Fear is the path to the dark side. Fear leads to anger.Anger leads to hate.Hate leads to suffering.... 發表人 - hahalin 於 2003/04/16 21:57:08 |
hua2000
中階會員 發表:102 回覆:200 積分:65 註冊:2006-11-04 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |