TMemoryStream 的 EAccessViolation 問題

發文回覆瀏覽次數：1824

推到 Plurk!

推到 Facebook!

TMemoryStream 的 EAccessViolation 問題

答題得分者是：RaynorPao

xgray
一般會員

發表：12
回覆：14
積分：10
註冊：2002-04-14

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-06-21 17:43:39

IP:203.203.xxx.xxx 未訂閱

下面是我寫的一小段程式碼

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  try
  {
    TMemoryStream *ms=new TMemoryStream();
    IdHTTP->Get("http://home.pchome.com.tw/online/chjo/01.jpg",ms);
    delete ms;
    ShowMessage("Complete");
  }
  catch(Exception &e)
  {
    ShowMessage(e.Message);
  }
}

這樣會出現 EAccessViolation 的錯誤訊息，請問該怎麼辦？

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-06-22 22:41:45

IP:61.221.xxx.xxx 未訂閱

引言: 下面是我寫的一小段程式碼

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  try
  {
    TMemoryStream *ms=new TMemoryStream();
    IdHTTP->Get("http://home.pchome.com.tw/online/chjo/01.jpg",ms);
    delete ms;
    ShowMessage("Complete");
  }
  catch(Exception &e)
  {
    ShowMessage(e.Message);
  }
}

這樣會出現 EAccessViolation 的錯誤訊息，請問該怎麼辦？

xgray 你好:
(1)小弟我已經試過以下的程式碼，應該是沒有問題，可以下載完整的圖檔，內
   容是一隻烏龜吧？
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   try
   {
      TMemoryStream *ms=new TMemoryStream;
      IdHTTP1->Get("http://home.pchome.com.tw/online/chjo/01.jpg", ms);
      ms->SaveToFile("01.jpg");
      delete ms;
   }
   catch(Exception &e)
   {
      ShowMessage(e.Message);
   }
}
(2)建議你檢查 Indy 元件的版本，是否為 9.0.14？如果不是的話，請先按照以
   下這篇文章中的做法昇級
   http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25182
(3)另外，如果 Indy 的版本沒有問題的話，建議你檢查其他部分的程式碼，因
   為上面的程式碼是沒有問題的 (你可以建立一個新的專案，只加入上面的程
   式碼，執行之後就可以驗證)

-- Enjoy Researching & Developing --

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

xgray
一般會員

發表：12
回覆：14
積分：10
註冊：2002-04-14

發送簡訊給我

#3 引用回覆回覆

發表時間：2004-06-23 19:20:50

IP:203.203.xxx.xxx 未訂閱

引言:

xgray 你好:
(1)小弟我已經試過以下的程式碼，應該是沒有問題，可以下載完整的圖檔，內
   容是一隻烏龜吧？
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   try
   {
      TMemoryStream *ms=new TMemoryStream;
      IdHTTP1->Get("http://home.pchome.com.tw/online/chjo/01.jpg", ms);
      ms->SaveToFile("01.jpg");
      delete ms;
   }
   catch(Exception &e)
   {
      ShowMessage(e.Message);
   }
}
(2)建議你檢查 Indy 元件的版本，是否為 9.0.14？如果不是的話，請先按照以
   下這篇文章中的做法昇級
   http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25182
(3)另外，如果 Indy 的版本沒有問題的話，建議你檢查其他部分的程式碼，因
   為上面的程式碼是沒有問題的 (你可以建立一個新的專案，只加入上面的程
   式碼，執行之後就可以驗證)

-- Enjoy Researching & Developing --

謝謝版主大大肯幫我做個小測試，我將BCB重裝之後就沒問題了，真是一個奇怪的元件。

系統時間：2024-05-17 5:43:26

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！