W windhya Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #3 忘记条件了！我要一个函数，能判别一个字符串中是否全为数字和小数点！
W www Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #5 begin result:=true; for i:=0 to length(a) do begin if ((a<'1') or (a>'9')) and (a<>'.') then begin result:=false; break; end; end; end;
begin result:=true; for i:=0 to length(a) do begin if ((a<'1') or (a>'9')) and (a<>'.') then begin result:=false; break; end; end; end;
W windhya Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #6 这我也知道，但我要同时处理数十个字符串时不是很慢吗？
C Chenlili Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-21 #7 上面可改为 a in ['0'..'9','.'] 另外可改进试试val函数， 不过科学计数法里'E'也是允许的，所以要做一点判断。 呵呵，大概就这样吧，还有什么问题可以再一起讨论。
