請問現有的form 怎樣繼承到一張新的form 上 |
|
|
|
aaronkuok
一般會員   發表：5 回覆：1 積分：1 註冊：2002-03-11 發送簡訊給我 |
|
|
領航天使
站長   發表：12216 回覆：4186 積分：4084 註冊：2001-07-25 發送簡訊給我 |
引言: 我的program 共有5 張form, 分別執行 Add, Change, Delete 等功能, 現在想每張 form 最底部加一條內容相同的 status bar, 以顯示program 的版權名稱等資料; 我想建立另一張 form包含這些資料, 然後將原有的 form 繼承這張 form, 請問怎樣做呢 (註 : 是將現有的 form 繼承到一張新的 form 上, 不是新建立一張 form來繼承).應不難吧! 假設原來的五個From為 TForm1 = class(TForm) ... TForm2 = class(TForm) ... TForm3 = class(TForm) ... TForm4 = class(TForm) ... TForm5 = class(TForm) ... 建一個,內只有status bar其它是空的 TForm0 = class(TForm) ... 一個一個叫出From1..Form5修改: TForm1 = class(TForm0) ... TForm2 = class(TForm0) ... TForm3 = class(TForm0) ... TForm4 = class(TForm0) ... TForm5 = class(TForm0) ... 這是您要的嗎? ～～～Delphi K.Top討論區站長～～～
------
～～～Delphi K.Top討論區站長～～～ |
|
天外來客
初階會員 發表：22 回覆：199 積分：44 註冊：2001-11-27 發送簡訊給我 |
|
|
領航天使
站長 發表：12216 回覆：4186 積分：4084 註冊：2001-07-25 發送簡訊給我 |
引言: 建立了的新 Form (fmFater), 我開 New Form 繼承時可以看到那條 Status Bar, 但原來的 5 張 Form, 改了 Class(TfmFather), 仍看不到那條 Status Bar, 要執行程序時才看得見, 且被原有 Form 上其他物件覆蓋著, 要調整原有 Form 的尺寸才可完全顯示出來, 請問怎樣解決 ?請問您原來的From是很多嗎? 一個一個改會麻煩? ～～～Delphi K.Top討論區站長～～～
------
～～～Delphi K.Top討論區站長～～～ |
|
scottliou
版主 發表：16 回覆：56 積分：47 註冊：2002-03-14 發送簡訊給我 |
發表時間：2002-03-20 16:09:43
IP:202.175.xxx.xxx 未訂閱
系統時間：2025-01-30 14:09:16
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |