[問題]多個TImage顯示的問題 |
|
答題得分者是：RaynorPao
|
|
plihui
初階會員   發表：88 回覆：96 積分：41 註冊：2003-07-03 發送簡訊給我 |
|
|
g6101
高階會員 發表：22 回覆：129 積分：110 註冊：2002-06-15 發送簡訊給我 |
plihui您好：
看了內容不太能了解你的用意，但猜想你是否希望用判斷方式，一一為TImage元件載入圖檔，如果是話請參考以下的方法：
(1)將TImage元件之(屬性)Tag，按照1...10方式重新編號；使用動態建立TImage元件時最為方便。
(2)onCreate事件填入
TImage *pic;
AnsiString picname;
for (int i=0;i<((TComponent*)Form1)->ComponentCount;i )//取得所有元件
{
pic = dynamic_cast＜TImage*＞(Form1->Components[i]);//動態型別轉換
if (pic) //是否為TImage元件
{
picname.sprintf("%d.bmp",pic->Tag);
pic->Picture->LoadFromFile(picname);
}
} 發表人 - g6101 於 2004/03/27 21:47:33 發表人 - g6101 於 2004/03/27 21:55:44
|
|
jest0024
高階會員 發表：11 回覆：310 積分：224 註冊：2002-11-24 發送簡訊給我 |
引言: plihui您好： 看了內容不太能了解你的用意，但猜想你是否希望用判斷方式，一一為TImage元件載入圖檔，如果是話請參考以下的方法： (1)將TImage元件之(屬性)Tag，按照1...10方式重新編號；使用動態建立TImage元件時最為方便。 (2)onCreate事件填入 TImage *pic; AnsiString picname; for (int i=0;i<((TComponent*)Form1)->ComponentCount;i )//取得所有元件 { pic = dynamic_cast＜TImage*＞(Form1->Components[i]);//動態型別轉換 if (pic) //是否為TImage元件 { picname.sprintf("%d.bmp",pic->Tag); pic->Picture->LoadFromFile(picname); } } 發表人 - g6101 於 2004/03/27 21:47:33 發表人 - g6101 於 2004/03/27 21:55:44FindComponent('Obj Name') |
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 假設我有10個TImage 每個Image需要載入不同的圖 除了 Image1->Picture->LoadfromFile("1.bmp"); Image2->Picture->LoadfromFile("2.bmp"); ..... Image10->Picture->LoadfromFile("10.bmp"); 之外 有沒有更好的想法呢?plihui 你好: 請參考以下的做法
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
發表時間：2004-03-27 19:32:40
IP:61.230.xxx.xxx 未訂閱
系統時間：2024-05-19 4:31:01
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |