普 普行 Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-25 #2 http://www.sunistudio.com/nicrosoft/disparticle.asp?id=37 看看《Delphi高手突破》第四章第五章完全可以解决你的问题 给了几个例子,对初学者还是不错的
http://www.sunistudio.com/nicrosoft/disparticle.asp?id=37 看看《Delphi高手突破》第四章第五章完全可以解决你的问题 给了几个例子,对初学者还是不错的
L luoyanqing119 Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-26 #3 在KEYDOWN写好事件后保存为控件模板,安装到一个你喜欢的单元就可以了。
Q qq112729650 Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-26 #4 修改change事件,调用StrToIntDef即可 然后进行封装
M madic Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-27 #6 继承于TCustomEdit defstyle: dWord; defstyle := GetWindowLong(Edit1.Handle, GWL_STYLE); SetWindowLong(Edit1.Handle, GWL_STYLE, defstyle or ES_NUMBER)
继承于TCustomEdit defstyle: dWord; defstyle := GetWindowLong(Edit1.Handle, GWL_STYLE); SetWindowLong(Edit1.Handle, GWL_STYLE, defstyle or ES_NUMBER)
M madic Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-27 #7 你继承于TCustomEdit 后自己override procedure TCustomEdit.CreateParams(var Params: TCreateParams);过程 Parsms.Style:= Parsms.Style or ES_NUMBER; 就这样..OK
你继承于TCustomEdit 后自己override procedure TCustomEdit.CreateParams(var Params: TCreateParams);过程 Parsms.Style:= Parsms.Style or ES_NUMBER; 就这样..OK