盒子论坛 v2.1

在MaskEdit中我定义的格式是:"9999.99",当我向编辑框中输入12.38时，编辑框中显示"12__.38",可能我在上文中没有说清楚，我的意思是：能否把编辑框中的“__“等格式符去掉！向FOXPRO中的Picture子句一样！请指教，谢谢
老刘
----------------------------------------------
老刘

作者：

zizii (高高高级馒头)	★☆☆☆☆	-
	神秘会员

2003/9/14 20:12:57

1楼：

我不会foxpro，不知道什么Picture子句，不过编成，只要你能想到，就能做得到，反正就是算法问题。
你的问题可以很多方法解决，比如监测：
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  i:integer;
  s,k:string;
begin
  s:=maskedit1.Text;
  k:=';
  for i:=1 to length(s) do
    if s[i] in ['0'..'9','.'] then
      k:=k+s[i];
  showmessage(k);
end;
----------------------------------------------
维护世界和平，共创美好盒子。

信息

登陆以后才能回复