Работая со строками в Delphi нам приходиться манипулировать ими, сравнивать, текстовое содержимое переводить в числовое и т.д. Допустим, нам надо ввести в поле пароль. И чтобы не получать при этом ошибок необходимо удалять пробелы с которых начинаются или заканчиваются обрабатываемые данные.
- Функции Delphi TrimRight - удаляет пробелы справа,
- Функции Delphi TrimLeft - удаляет пробелы слева,
- Функции Delphi Trim - удаляет начальные и конечные пробелы.
Для закрепления материала создадим приложение, расположим на нем кнопку и компонент Edit. Свойству PasswordChar присвоим значение *.
У нас должна получиться такая форма, как слева ни рисунке.
Далее нужно сформировать обработчик события кнопки. При правильном вводе пароля нам сообщат что пароль верен, при неправильном, нас тоже об этом проинформируют. Паролем у нас будет цифра ноль. И если случайно мы нажмем пробел то результат от этого не измениться. Так что эту функцию необходимо запомнить.
procedure TForm1.Button1Click(Sender: TObject); begin if (TRIM(Edit1.Text) <> '0') then ShowMessage('Не верный пароль') else ShowMessage('Правильный пароль'); end;
Итог: нами разобраны функции Delphi позволяющие удалять начальные и конечные пробелы.