將form傳入副程式及function中 |
尚未結案
|
uhlin
一般會員 發表:8 回覆:6 積分:2 註冊:2003-07-04 發送簡訊給我 |
|
Stallion
版主 發表:52 回覆:1600 積分:1995 註冊:2004-09-15 發送簡訊給我 |
隨手寫來,沒有測試過!提供一個參考!
< class="code">
void TEST(TObject &aForm,AnsiString aName,AnsiString Title)
{
int i;
for ( i = 0 ; i < TForm(aForm)->ControlCount ; i )
{
if TForm(aFrom)->Controls[i]->Name == aName )
TForm(aForm)->Controls[i]->Caption = Title; // 這邊是Caption還是lable要自行再加強判斷
}
}
-------------------
學然後知不足. 發表人 - stallion 於 2005/07/04 01:27:48 發表人 - stallion 於 2005/07/04 01:34:05
|
andychang1690
資深會員 發表:20 回覆:694 積分:442 註冊:2003-03-14 發送簡訊給我 |
uhlin:Form是可以傳遞的! 例: void __fastcall TForm1::Button1Click(TObject *Sender) { LoadINIForm(this); // 將此Form1傳出 } void LoadINIForm(TForm *WForm) { if (WForm == NULL) return ; PPropInfo PropInfo; PTypeInfo ptrTypeInfo; TComponent *pComponent; AnsiString S; for (int i=0;iAndy Chang 發表人 - andychang1690 於 2005/07/04 02:39:15
------
Andy Chang |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |