如何判断输入EDIT的内容的类型?(20分)

  • 主题发起人 主题发起人 redwood
  • 开始时间 开始时间
R

redwood

Unregistered / Unconfirmed
GUEST, unregistred user!
我是指判断内容是string还是int 还是datetime 等等
 
edit中的内容只能是string类型.
 
这就没办法了~可以用try 如果不是你想要的类型就抛出一个异常
 
只要你能输入的,那都是String型 :)
 
procedure TForm1.Button2Click(Sender: TObject);
var i:integer;
begin
try
strtoint(edit1.text);
i:=1;
except
try
strtodatetime(edit1.text);
i:=2;
except
i:=3;
end;
end;
case i of
1:showmessage('integer');
2:showmessage('datetime');
3:showmessage('string');
end;
end;
 
楼上的方法不错,但是每次运行都要出错……
如何才能屏蔽掉错误信息呢?
 
后退
顶部