ОСТАВИТЬ В СТРОКЕ ТОЛЬКО ЦИФРЫ DELPHI

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

Для решения этой задачи можно воспользоваться функцией AnsiChar, которая проверяет, является ли заданный символ цифрой.

var s: string; i: Integer; clean_s: string;begin // получаем строку от пользователя s := 'abc123def456'; // очищаем строку от нецифровых символов clean_s := ''; for i := 1 to Length(s) do if (AnsiChar(s[i]) >= '0') and (AnsiChar(s[i]) <= '9') then clean_s := clean_s + s[i]; // clean_s содержит только цифры из исходной строкиend;

В данном примере мы получаем строку от пользователя и сохраняем ее в переменную s. Затем мы создаем пустую переменную clean_s, которую будем использовать для хранения очищенной строки. После этого мы проходим циклом по исходной строке и проверяем каждый символ, является ли он цифрой. Если символ цифра, то мы добавляем его в clean_s. В итоге в переменной clean_s содержится только цифры из исходной строки.

Вебинар \

Программирование в Delphi Урок 5. Массивы и циклы, цикл for, глобальные переменные. Array

Pascal и Delphi живы? / История / Популярность / Мифы / Возможности / Преимущества и недостатки

Кроссплатформенная разработка с Lazarus/ObjectPascal/Delphi. Программирование #ityoutubersru

Change Your Build Configuration Faster - Delphi #209

Всё о Delphi \u0026 Pascal / Из музыканта в программисты / Интервью с Delphi Developer

Программирование в Delphi. Урок 12.5. Решение самостоятельного задания. Используем BREAK и CONTINUE

[DELPHI] ClientSocket/ServerSocket.

Программирование в Delphi Урок 3 2 Работа с текстом, строковые функции Length, Pos и другие

Программирование в Delphi Урок 8. Компоненты Главное меню и диалоговые окна