[artem779]

я не очень знаю, как пользоваться регулярный выражениями. подскажите, мне пожалуйста, каким кодом на Delphi можно реализовать следющую операцию
у меня есть переменная

Код:

 * * *
var
  curStr : string;
  cutedStr : string;

begin
  curStr := 'acds dfs _ df3425 dd'
 * * *

как в переменную cutedStr записать все цифры, содержащиеся в curStr ?

[Aristarh Dark]

Код:

var
  curStr : string;
  cutedStr : string;
  i:integer;
begin
  curStr := 'acds dfs _ df3425 dd';
  cutedStr:='';
  for i:=1 to Length(curStr) do
    if curStr[i] in ['0'..'9'] then
      cutedStr:=cutedStr+curStr[i];