求一条EditMask(20分)

小天

Unregistered / Unconfirmed
GUEST, unregistred user!
要求只能输入 数字,小数点及负号
 
用SpinEdit
 
无数第三方构件可以, 不过用tmaskedit就不行了:-(
 
怎么用呢?
 
SpinEdit直接使用就可以了.符合你的要求.
 
用maskedit:
!-9999;1;_
这样就是,需要多少位就加多少个9,
不过不能空。

(maskedit就是不太好用;)
 
忘记了小数点了:
-99.99;1;_


 
caKK:怎么去掉spinedit的箭头?
 
箭头留着吧,多酷啊! :p
 
好难看~~~~~~~~
 
怎么难看? 再说还多一个功能,可以用鼠标输入数字.
 
要不你就参考SpinEdit是怎么限制字符的,自己写一个:

function TSpinEdit.IsValidChar(Key: Char): Boolean;
begin
Result := (Key in [DecimalSeparator, '+', '-', '0'..'9']) or
((Key < #32) and (Key <> Chr(VK_RETURN)));
if not FEditorEnabled and Result and ((Key >= #32) or
(Key = Char(VK_BACK)) or (Key = Char(VK_DELETE))) then
Result := False;
end;
 
是啊,自己写一个呀,不费劲。
 
多人接受答案了。
 
顶部