TEdit控件问题???(200分)

  • 主题发起人 主题发起人 guilin
  • 开始时间 开始时间
G

guilin

Unregistered / Unconfirmed
GUEST, unregistred user!
请教各位高手:
1、如何将一个EDIT控件定义为只能输入浮点数(保留三位小数)?
2、如何将EDIT控件只的浮点数以小数点对齐?
3、如何使EDIT控件输入到最大长度后自动转到下一个?
4、当小数位不足时自动加0?
5、如何定义只能输入半角数字或字母?


 
换成MaskEdit吧,所有问题都可轻松解决!
 
能否详细的介绍一下如何用MaskEdit控件??
 
看一下帮助吧,有关Tmaskedit的Maskedit属性
 
g;www
很容易的。
 
MaskEdit有个EditMask属性
对于问题1、2、5, EditMask可设为 999999.000;1;_
对于问题3,在OnChange事件中写代码:
if Length(Trim(MaskEdit1.Text))>=N then
SelectNext(ActiveControl,True,True);
对于问题3,在OnExit事件中写代码来完成,如何写,你先试一下,很有意思的:)

EditMask属性,使用很灵活,你看下帮助,并不难。







 
To GuiLin
顺便问一下,你是桂林人吗?
 
我不是桂林人
 
请发一个Email给我,我将告诉你答案。我的Email是:pengchengfei@163.net
 
后退
顶部