M mymy Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-14 #2 例:delphi 3569,可以单独将3569取出来吗??
K Kingron Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-14 #4 这个也问?把字符串从头扫描一次即可阿。 for i;=1 to length(Str) do if Str in ['0'..'9'] then Result := Result + Str