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

請問各位大大~

尚未結案
JK2050
一般會員


發表:5
回覆:5
積分:2
註冊:2005-03-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-08-25 14:39:35 IP:210.59.xxx.xxx 未訂閱
各位大大,第一次來上來問問題...所以問的問題可能有點笨~我是想要使用兩個自行規劃的記憶體位置來load圖檔,再加上timer來作...可是,為何只能做第一次呢?然後就會出現錯誤!他說是記憶體位置錯誤~感覺上好像是記憶體未釋放??~請大大幫我解答一下> <謝謝~~以下是我的程式碼:    #include  #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TMemoryStream *a,*b; TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { a=new TMemoryStream; b=new TMemoryStream; Timer1->Enabled=true; Timer1->Interval=2000; Timer2->Enabled=true; Timer2->Interval=3000; } //--------------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender) { a->LoadFromFile("C://Documents and Settings/JohnKart/My Documents/BCB/0.bmp"); Image1->Picture->Bitmap->LoadFromStream(a); b->LoadFromStream(a); delete a; Image2->Picture->Bitmap->LoadFromStream(b); delete b; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TForm1::Timer2Timer(TObject *Sender) { delete Image1; delete Image2; }
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-08-25 17:50:08 IP:210.68.xxx.xxx 未訂閱
您好: 請為您的問題取一個有意義的標題    PO程式碼的方式與版規說明請參考下面連結,煩請修改謝謝您的配合 > 關於程式部份,您只 >
系統時間:2024-05-12 12:22:21
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!