Тема
:
Проблемка с файл менеджером
Показать сообщение отдельно
#
3
21.05.2006, 15:45
Kaka
Прохожий
Регистрация: 30.04.2006
Сообщения: 24
Репутация:
10
Или так
Я в своём Бэкоре писал следдующее:
repeat
if copy(s,i,1) <> '\' then
begin
delete(s,i,1);
i := i-1;
end;
until
copy(s,i,1) = '\';
Но можно и проще(pos...)
__________________
KaKa
Kaka
Посмотреть профиль
Отправить персональное сообщение для Kaka
Отправить Email для Kaka
Найти все сообщения от Kaka