Показать сообщение отдельно
  #1  
Старый 26.01.2014, 16:59
Noooob Noooob вне форума
Прохожий
 
Регистрация: 24.12.2013
Сообщения: 38
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Удаление символов

Помогите пожалуйста. Как мне удалить символы после последнего \. Если так:
Код:
S := Edit1.Text;
 P := Pos('\', S);
 Edit1.Text := Copy(S, 0, P);
то удаляет все после первого.
Ответить с цитированием