請教 如何用三層式架構,使用BDE聯結方式,來讀取資料庫中的JPEG資料 |
|
尚未結案
|
|
chenbigcat
一般會員   發表：4 回覆：3 積分：1 註冊：2004-08-26 發送簡訊給我 |
各位先進:
想請教 用三層式架構,使用BDE聯結資料庫，如何存取JPEG資料,並將資料
SHOW 在 報表中?
我使用的元件,server 端用TDataSetProvider,client 端用 TClientDataSet,TDataSource,想用qreport產生報表,報表中使用TQRImage,
如何讓JPEG資料能SHOW在報表上?
報表程式部份內容(執行有誤):
procedure TQR_Form.QRBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
VAR Stream1:TMemoryStream;
jpgstream1: TJpegImage;
Stream2:TMemoryStream;
jpgstream2: TJpegImage;
begin
Stream1:=TMemoryStream.Create ;
jpgstream1:= TJPEGImage.Create;
TBlobField(DM.CD_DPT_PHOTO.FieldByName('C_PHOTO') as TBlobField).SaveToStream(Stream1); Stream1.Position := 0;
jpgstream1.LoadFromStream(Stream1);
QRImage1.Picture.Assign(jpgstream1);
END;
請各位先進賜教,謝謝
|
|
change.jian
版主  發表：29 回覆：620 積分：439 註冊：2003-06-02 發送簡訊給我 |
|
|
chenbigcat
一般會員 發表：4 回覆：3 積分：1 註冊：2004-08-26 發送簡訊給我 |
發表時間：2004-10-25 18:26:00
IP:140.117.xxx.xxx 未訂閱
系統時間：2024-04-25 18:18:19
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |