Сообщество Чайников

Вопрос

Есть ли в Delphi функция, чтобы:
отсекать последний знак у строки;
удалять остаток строки с n-го знака;
вести поиск подстроки в строке.

Ответ

Есть:
var s,s2:string;
…
1. delete(s,length(s)-1,1)
или delete(str,length(str)-1,1);

Если ты имеешь в виду управляющие символы конца строки, то можно использовать trimright и trimleft.

2. delete(s,n,length(s)-n+1)
или delete(str,n,length(str));

3. k:=pos(s,s2);
или i:=pos('a',str);

MSknyaz, A.Z., Seacat