Строковые функции в delphi

  • Автор темы MODERN
  • Дата начала
MODERN
Участник
Сообщения
756
Реакции
130
Поговорим о строковых функциях в Delphi.

Функция delete.
она служит для вырезания части слова.

Вот пример;

на форму кидаем текстовое поле и кнопку
объявляем строковую переменную a;
Код:
rocedure TForm1.Button1Click(Sender: TObject);
begin
a := edit1.Text;
delete(a, 2, 3);
edit1.Text := a;
end;

end.
Если в текст. поле введём например qwerty, то после нажатия на кнопку в текст. поле будет qty.

Функция Concat
Она служит для склеивания слов.

вот пример;

На форму кидаем текст. поле и кнопку
вот код для кнопки
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.Text := Concat('yy', 'tt', 'ff');
end;

end.
Функция length
она считает сколько символов в слове

вот пример
на форму опять кидаем текст. поле и кнопку
в кнопке пишем такой код
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.Text := inttostr(length('QWERTY'));
end;

end.
в текст. поле выведется 6, тут мы использовали функцию inttostr для перевода числа в строку
 
Сверху