請問BCB有類似VB裡"物件陣列"的功能嗎?? |
尚未結案
|
july
一般會員 發表:18 回覆:17 積分:7 註冊:2003-07-09 發送簡訊給我 |
|
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
july您好:
試試下面的code
TImage *ima[9]; int i,j,k; for(j=0;j<3;j ) { for(i=0,k=0;i<3;i ,k ) { ima[k]= new TImage(this); ima[k]->Parent=Form1; ima[k]->AutoSize=false; ima[k]->Left=(25 90*j); ima[k]->Top=(20 90*i); ima[k]->Height=89; ima[k]->Width=89; ima[k]->Visible=true; } } ima[0]->Picture->LoadFromFile("test.bmp");順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~> |
brian7003
一般會員 發表:1 回覆:2 積分:0 註冊:2003-07-20 發送簡訊給我 |
|
李國維
高階會員 發表:42 回覆:287 積分:235 註冊:2003-02-07 發送簡訊給我 |
在.h中宣告
private:
void __fastcall ImgOnClick(TObject *Sender);
在.CPP中
TImage *ima[9];
int i,j,k;
for(j=0;j<3;j )
{
for(i=0,k=0;i<3;i ,k )
{
ima[k]= new TImage(this);
ima[k]->Parent=Form1;
ima[k]->AutoSize=false;
ima[k]->Left=(25 90*j);
ima[k]->Top=(20 90*i);
ima[k]->Height=89;
ima[k]->Width=89;
ima[k]->Visible=true;
ima[k]->OnClick = ImgOnClick;//所有Imageㄉonclick事件
ima[k]->Tag = k;
}
}
//==============================================
void __fastcall TForm1::ImgOnClick(TObject *Sender)
{
int i;
i = ((TImage*)Sender)->Tag; //i就表示第幾各image
//============Codeing Here===================== }
|
李國維
高階會員 發表:42 回覆:287 積分:235 註冊:2003-02-07 發送簡訊給我 |
在.h中宣告
private:
void __fastcall ImgOnClick(TObject *Sender);
在.CPP中
TImage *ima[9];
int i,j,k;
for(j=0;j<3;j )
{
for(i=0,k=0;i<3;i ,k )
{
ima[k]= new TImage(this);
ima[k]->Parent=Form1;
ima[k]->AutoSize=false;
ima[k]->Left=(25 90*j);
ima[k]->Top=(20 90*i);
ima[k]->Height=89;
ima[k]->Width=89;
ima[k]->Visible=true;
ima[k]->OnClick = ImgOnClick;//所有Imageㄉonclick事件
ima[k]->Tag = k;
}
}
//==============================================
void __fastcall TForm1::ImgOnClick(TObject *Sender)
{
int i;
i = ((TImage*)Sender)->Tag; //i就表示第幾各image
//============Codeing Here===================== }
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |