Тема: Удаления всех символов кроме цифр в строке
Показать сообщение отдельно
  #5  
Старый 30.07.2013, 22:24
Аватар для cotseec
cotseec cotseec вне форума
Активный
  
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию
Код:
...
if not (Text[i] in D) then Delete(text, i, 1);
...
скобки
__________________
Понять, что хочет заказчик - бесценно, ведь он платит MasterCard