全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2052
推到 Plurk!
推到 Facebook!

BLOB not Opened 請問如何解決呢?

答題得分者是:syntax
TTS
初階會員


發表:72
回覆:66
積分:27
註冊:2003-05-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-01-03 18:21:26 IP:220.132.xxx.xxx 訂閱

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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-01-05 18:17:50 IP:61.64.xxx.xxx 訂閱
你英文看不懂喔!我來幫你翻譯一下

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, 註解 無‧
系統時間:2017-12-13 21:11:43
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!