線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:2130
推到 Plurk!
推到 Facebook!

在Delphi2009中是使用IdDecoderMIME来解码的問題

答題得分者是:pcplayer99
zz005
一般會員


發表:1
回覆:5
積分:1
註冊:2009-03-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-04-09 21:24:04 IP:219.131.xxx.xxx 訂閱
procedure TForm1.Button1Click(Sender: TObject);//把圖片讀到Memo1
  var
    f : TFileStream;
begin
    f := TFileStream.Create('C:\Pictures\123.JPG', fmOpenRead);
    try
    Memo1.Lines.Text := IdEncoderMIME1.Encode(f);
    finally
    f.Free;
    end;
end;

{各位大哥,俺是elphi2009的環境,用DecodeToStream出錯了,
DCC Error] Unit1.pas(52): E2003 Undeclared identifier: 'DecodeToStream'

procedure TForm1.Button2Click(Sender: TObject);
var
f : TmemoryStream;
begin
f := TmemoryStream.Create;
try
    IdDecoderMIME1.DecodeToStream(Memo1.Lines.Text,f);
    f.Position := 0;
    image1.Picture.bitmap.LoadFromStream(f);
finally
    f.Free;
end;
end;
編輯記錄
taishyang 重新編輯於 2009-04-10 00:38:45, 註解 刪除[求助]字樣‧
pcplayer99
尊榮會員


發表:142
回覆:738
積分:591
註冊:2003-01-21

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-04-10 12:21:08 IP:116.24.xxx.xxx 訂閱
没用过 D2009,看提示,Undeclared identifier: 'DecodeToStream' ,也即是DELPHI 找不到哪里声明了 DecodeToStream 嘛。

你需要去查 IDEncoderMIMI 的 Source,看看那个 DecodeToStream 是怎么回事。或许就是你拖了个控件过来,但 DELPHI 没有自动帮你在单元里添加 uses 某个 unit 导致的,你自己添加上去就好。

我在 d7 底下用 indy 的 Base64 没有问题的。


===================引 用 zz005 文 章===================
procedure TForm1.Button1Click(Sender: TObject);//把圖片讀到Memo1
  var
    f : TFileStream;
begin
    f := TFileStream.Create('C:\Pictures\123.JPG', fmOpenRead);
    try
    Memo1.Lines.Text := IdEncoderMIME1.Encode(f);
    finally
    f.Free;
    end;
end;

{各位大哥,俺是elphi2009的環境,用DecodeToStream出錯了,
DCC Error] Unit1.pas(52): E2003 Undeclared identifier: 'DecodeToStream'

procedure TForm1.Button2Click(Sender: TObject);
var
f : TmemoryStream;
begin
f := TmemoryStream.Create;
try
    IdDecoderMIME1.DecodeToStream(Memo1.Lines.Text,f);
    f.Position := 0;
    image1.Picture.bitmap.LoadFromStream(f);
finally
    f.Free;
end;
end;
zz005
一般會員


發表:1
回覆:5
積分:1
註冊:2009-03-21

發送簡訊給我
#3 引用回覆 回覆 發表時間:2009-04-14 02:44:00 IP:219.131.xxx.xxx 訂閱
謝謝pcplayer99兄台!好幾天這個網站都不能打開,我再試試~
===================引 用 pcplayer99 文 章===================
没用过 D2009,看提示,Undeclared identifier: 'DecodeToStream' ,也即是DELPHI 找不到哪里声明了 DecodeToStream 嘛。

你需要去查 IDEncoderMIMI 的 Source,看看那个 DecodeToStream 是怎么回事。或许就是你拖了个控件过来,但 DELPHI 没有自动帮你在单元里添加 uses 某个 unit 导致的,你自己添加上去就好。

我在 d7 底下用 indy 的 Base64 没有问题的。
Coffee
版主


發表:31
回覆:878
積分:561
註冊:2006-11-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2009-04-14 10:54:03 IP:59.124.xxx.xxx 訂閱
發文請注意分區
------
不論是否我發的文,在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處,以及讓答案可以被重複的使用,希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法,謝謝大家!
zz005
一般會員


發表:1
回覆:5
積分:1
註冊:2009-03-21

發送簡訊給我
#5 引用回覆 回覆 發表時間:2009-04-14 13:20:21 IP:219.131.xxx.xxx 訂閱
不好意思,版主大人!
系統時間:2017-10-23 10:17:35
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!