BLOB not Opened 請問如何解決呢? |
答題得分者是:syntax
|
TTS
初階會員 ![]() ![]() 發表:72 回覆:66 積分:27 註冊:2003-05-06 發送簡訊給我 |
var Stream1: TBlobStream; redTemp1: TStringList; begin with dmPathologyReport do begin LocatePAReportSheetNo(sqryTempPAReport, iSheetNo); redText.Lines.Add(sTaitl); redText.Lines.Add(''); Stream1:= TBlobStream.Create(sqryTempPaReport.FieldByName('RealPaDiag'), bmRead); redTemp1:= TStringList.Create; try redTemp1.LoadFromStream(Stream1); 當Run到LoadFromStream 就會出現BLOB not Opened 請問小弟是哪出錯了呢??? ps: RealPaDiag TEXT IN TABLE 編輯記錄
TTS 重新編輯於 2008-01-03 18:24:07, 註解 無‧
|
syntax
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:26 回覆:1139 積分:1258 註冊:2002-04-23 發送簡訊給我 |
你英文看不懂喔!我來幫你翻譯一下
BLOB not Opened 就是說 TBlobStream 沒有將檔案開啟 Stream1:= TBlobStream.Create(sqryTempPaReport.FieldByName('RealPaDiag'), bmRead); 這一行,沒有正確完成 可能 1. 檔案未成功開啟 2. 甚至於因為找不到檔案,所以物件完全沒有建立 請確定 Stream1 確實是正確建立,並將檔案開啟 (因為是資料庫,所以請確定查詢成功,該欄位有資料,或不是 NULL 之類的值) ===================引 用 TTS 文 章=================== var Stream1: TBlobStream; redTemp1: TStringList; begin with dmPathologyReport do begin LocatePAReportSheetNo(sqryTempPAReport, iSheetNo); redText.Lines.Add(sTaitl); redText.Lines.Add(''); Stream1:= TBlobStream.Create(sqryTempPaReport.FieldByName('RealPaDiag'), bmRead); redTemp1:= TStringList.Create; try redTemp1.LoadFromStream(Stream1); 當Run到LoadFromStream 就會出現BLOB not Opened 請問小弟是哪出錯了呢??? ps: RealPaDiag TEXT IN TABLE
編輯記錄
syntax 重新編輯於 2008-01-05 18:18:34, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |