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

請問如何以FOR迴圈使圖移動

 
speaking123456
一般會員


發表:5
回覆:2
積分:1
註冊:2006-12-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-03-20 21:32:39 IP:59.125.xxx.xxx 訂閱
這是我們的程式,那現在面臨的問題在於compil可以通過,但是圖像跑不出來, 想請高人幫忙。    //---------------------------------------------------------------------------    #include  #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" unsigned char g[24882][768]; TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender) { Graphics::TBitmap *TheBitmap, *TempBitmap; int Width,Height; Byte *ptr1,*ptr2; TempBitmap->LoadFromFile("123.bmp"); Double R[24882][768], G[24882][768], B[24882][768], Total[24882][768]; //TempBitmap=new Graphics::TheBitmap(); TheBitmap=Image1->Picture->Bitmap; //TempBitmap->LoadFromFile("123.bmp"); TheBitmap->PixelFormat=pf24bit; TempBitmap->Assign(TheBitmap); Width=TheBitmap->Width; Height=TheBitmap->Height; for(int y=0;yScanLine[y]; ptr2=(Byte*) TheBitmap->ScanLine[y]; for(int x=0;xAssign(TheBitmap); //ShowMessage(TempBitmap); delete TheBitmap; } //---------------------------------------------------------------------------
JerryKuo
版主


發表:42
回覆:571
積分:322
註冊:2003-03-10

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-03-21 09:45:08 IP:220.135.xxx.xxx 訂閱
<textarea cols="60" rows="10" class="cpp" name="code"> TempBitmap->Assign(TheBitmap); </textarea> TempBitmap只是bitmap物件,要貼到Image物件上才能看得到。
speaking123456
一般會員


發表:5
回覆:2
積分:1
註冊:2006-12-05

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-03-23 19:09:50 IP:59.125.xxx.xxx 訂閱
請問一下,那要改哪一個,且要怎樣改,你可以教我一下嗎?
speaking123456
一般會員


發表:5
回覆:2
積分:1
註冊:2006-12-05

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-03-27 21:04:29 IP:125.230.xxx.xxx 訂閱
請問一下
要怎樣改,你可以教我一下嗎?
dicky9055
一般會員


發表:20
回覆:48
積分:18
註冊:2006-08-02

發送簡訊給我
#5 引用回覆 回覆 發表時間:2007-03-30 13:16:52 IP:211.76.xxx.xxx 未訂閱
我想你先買一本關於影像處理程式的書來看一下會比較好
要顯示出來只要用
Image1->Picture->Assign(TempBitmap);
===================引 用 文 章===================
請問一下
要怎樣改,你可以教我一下嗎?
系統時間:2024-04-19 15:35:28
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!