我自訂了一個元件叫NumEdit 繼承TCustomEdit 並重載Change函數 在函數內容有動到SelStart 可以通過編譯 可是拉元件的時候出現 Control 'NumEdit1' has no parent window. 有動到SelStart那幾行的內容都是 SelStart=Text.Length(); 把那幾行註解掉就沒問題 請問是什麼原因？

嘿..可以了...    看了這篇文章 http://www.delphibbs.com/delphibbs/dispq.asp?lid=300090 雖然沒有太大關係 但是他有提到has no parent    似乎是 拉元件的時候就已經觸動了Change() 但是那時候TNumEdit的建構子還沒跑完 所以碰了SelStart就出問題 於是加了判斷Text.Length()>0才動SelStart 反正元件拉出來Text是空的...    也因為 拉元件的時候就觸動了Change() 所以我的元件拉出來Text是空的    不過雖然問題解決了 我還是覺得其中的過程有點怪 我建立了一個暫存變數 AnsiString ori; 來保存合法的Text內容 在Change()中檢查若不符合就把Text=ori; 在TNumEdit的建構子裡有 ori=Text; 這樣看來 他似乎在跑建構子前就觸動了Change()???? 所以.... 還有..那為什麼我動

看了StdCtrls.hpp TEdit的建構子宣告跟New Component 產生的程式碼不太一樣