我目前寫了一個可以動態產生n個shape元件在form上的程式
想在每個shape元件的mousedown事件裡寫按下這個shape顏色就會改變
有沒有什麼方法可以讓我不用在每個shape元件的mousedown事件裡寫程式碼
而可以只寫一次,讓其他shape共用呢?

針對24個shape各別呼叫其MouseDown的訊息，有沒有比較好的作法？
http://delphi.ktop.com.tw/board.php?cid=168&fid=913&tid=94475

這篇我有看過了
但這句話"所有Shape的MouseDown事件通通指向shape1的MouseDown事件"
意思我不是很懂,該如何做呢?

這樣懂嗎??

===================引 用 wu330033 文 章===================
這篇我有看過了
但這句話"所有Shape的MouseDown事件通通指向shape1的MouseDown事件"
意思我不是很懂,該如何做呢?

因為我是動態產生shape的
目前一開始一定要產生一個shape1元件出來才能在mousedown事件上寫程式
才能讓之後動態產生的shape執行shape1的mousedown事件
有沒有一開始不用產生一個shape1元件就能能在mousedown事件上寫程式的方法呢?
另外TShape *shape[101];這種寫法,陣列裡面的數字無法由介面輸入決定大小
有其它的方法嗎?

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
Shape2->On MouseDown = Shape1MouseDown;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Shape1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
ShowMessage("111");
}
//---------------------------------------------------------------------------

編輯記錄

感謝salo大
剩下最後一個問題
我動態產生的shape是由程式介面Edit1輸入決定幾乘幾
int row=StrToInt(Edit1->Text);
int column=StrToInt(Edit2->Text);
但是好像沒辦法像下面這樣寫
TShape *shape[row*column];
有別種的寫法嗎?

善用搜尋功能
以下搜尋的應該是你要的吧??
"動態宣告陣列" 字眼搜尋的
矩陣如何存成這樣的型式
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=58428
請問這樣的構想可行嗎？
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=63759

關於int arr[16][n] ;
你要利用動態宣告陣列的方式...
int **ary;
int n;
ary=new int*[16];
for(int i=0; i＜16; i＋＋)
ary[i]=new int[n];

編輯記錄