要如何按一個按鈕就會產生N個圖

發文回覆瀏覽次數：753

推到 Plurk!

推到 Facebook!

要如何按一個按鈕就會產生N個圖

尚未結案

sheepu
一般會員

發表：1
回覆：0
積分：0
註冊：2005-10-19

發送簡訊給我

#1 引用回覆回覆

發表時間：2005-10-26 00:19:26

IP:220.132.xxx.xxx 未訂閱

不好意思...我是BCB新手所以才會遇到這種鳥問題我想問的是... 我想要按一個button 然後就產生10個圖像但是我的程式碼跑出來以後那個button怎麼按都沒反應請問...要怎麼作才能按一個按鈕就會跑出10個圖呢? #include #pragma hdrstop #include "Unit1.h" //-------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; TImage* Image2[10]; //-------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //-------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { for(int i=0; i< 10; i ) { Image2[i] = new TImage(this); for(int j=0; j< 20; j ) for( int k=0; k< 20; k ) Image2[i]->Canvas->Pixels[j][k] = Image1->Canvas->Pixels[j][k]; //Image1是原本存在的圖片上面的指令是把Image1圖像一部分存到 Image2裡 Image2[i]->Height = 73; Image2[i]->Width = 73; Image2[i]->Left = (i 1)*10; Image2[i]->Top = (i 1)*10; } } //--------------------------------------------------------------------

taishyang
站務副站長

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

發送簡訊給我

#2 引用回覆回覆

發表時間：2005-10-26 09:30:42

IP:210.68.xxx.xxx 未訂閱

您好: PO程式碼的方式與版規說明請參考下面連結,煩請修改謝謝您的配合 > 關於程式的部份,試試改成下面這樣< class="code"> for(int i=0; i< 10; i ) { Image2[i] = new TImage(this); Image2[i]->Parent = this; for (int j=0; j<20; j ) for(int k=0; k<20; k ) Image2[i]->Canvas->Pixels[j][k] = Image1->Canvas->Pixels[j][k]; //Image1是原本存在的圖片上面的指令是把Image1圖像一部分存到 Image2裡 Image2[i]->Height = 73; Image2[i]->Width = 73; Image2[i]->Left = (i 1)*10; Image2[i]->Top = (i 1)*10; }

系統時間：2024-05-10 10:18:16

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

本站聲明

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