請問副程式內要怎麼接收image的編號 |
|
答題得分者是：taishyang
|
|
j620656786206
一般會員   發表：4 回覆：9 積分：2 註冊：2010-01-20 發送簡訊給我 |
[code delphi]
void __fastcall TForm3::Image2MouseMove(TObject *Sender, TShiftState Shift, int X, int Y) { DataInputBox((TImage*) Sender); } //--------------------------------------------------------------------------- void __fastcall TForm3::Image3MouseMove(TObject *Sender, TShiftState Shift, int X, int Y) { DataInputBox((TImage*) Sender); } //--------------------------------------------------------------------------- void __fastcall TForm3::DataInputBox(TImage *Image) { Image1->Picture=Image->Picture; switch((TImage*) Sender) { case 2: Variant v5(1); Variant v6(1); Variant v7; Variant KKK(String("ddd")); v7=ExcelWorksheet1->Cells->get__Default(v5,v6); //取列1欄1的值 Label1->Caption=v7; break; case 3: Variant v5(2); Variant v6(1); Variant v7; Variant KKK(String("ddd")); v7=ExcelWorksheet1->Cells->get__Default(v5,v6); //取列2欄1的值 Label1->Caption=v7; break; } } [/code] 程式碼如上 但是我compile後出現的結果是說switch括號內有錯 請問有人知道怎樣寫才是正確的嗎? |
|
ikk
尊榮會員  發表：4 回覆：413 積分：768 註冊：2003-06-30 發送簡訊給我 |
|
|
senso
高階會員 發表：5 回覆：126 積分：226 註冊：2003-11-27 發送簡訊給我 |
|
|
j620656786206
一般會員 發表：4 回覆：9 積分：2 註冊：2010-01-20 發送簡訊給我 |
|
|
taishyang
站務副站長  發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
|
|
j620656786206
一般會員 發表：4 回覆：9 積分：2 註冊：2010-01-20 發送簡訊給我 |
|
|
taishyang
站務副站長 發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
|
|
j620656786206
一般會員 發表：4 回覆：9 積分：2 註冊：2010-01-20 發送簡訊給我 |
發表時間：2010-03-29 19:37:23
IP:163.25.xxx.xxx 訂閱
系統時間：2024-04-24 14:29:23
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |