Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.01.2010, 20:24   #1
D_E_N
Форумчанин
 
Регистрация: 04.05.2009
Сообщений: 149
По умолчанию строка

Привет всем. имется стока c:\Windows\addins как каждый раз удалять всё до знака \ чтоб она имела вид c:\Windows.... или как на файловом менеджере сделать выход из папки в которой мы находимся.... проще говоря чтоб заработала кнопка назад подскажите пожалуйста. заранее благодарен.
Вложения
Тип файла: rar ListView2.rar (204.9 Кб, 7 просмотров)

Последний раз редактировалось D_E_N; 03.01.2010 в 20:34.
D_E_N вне форума Ответить с цитированием
Старый 03.01.2010, 21:27   #2
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Цитата:
c:\Windows\addins
Очень просто: Идем посимвольно по строке:
Код:
N:=1;
While (S[N]<>'\') And (N<>Length(S)) do Inc(N);
Нашли '\', теперь удаляем лишнее:
Код:
Delete(S,N,Length(S)-N);
Не забудьте сделать проверку на то, что мы сидим в корне диска:
Код:
If Length(S)<>3 Then
 Begin
  N:=1;
  While (S[N]<>'\') And (N<>Length(S))  do Inc(N);
  Delete(S,N,Length(S)-N);
 End;
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 03.01.2010, 21:44   #3
D_E_N
Форумчанин
 
Регистрация: 04.05.2009
Сообщений: 149
По умолчанию

извиняйте. забыл.
нешёл в чем была проблема. но новая появилась )))
теперь он кидает меня на корень диска а мне нужно просто выйти из папки. подскажи как

Последний раз редактировалось D_E_N; 03.01.2010 в 22:03.
D_E_N вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Строка powerlifting Общие вопросы C/C++ 13 22.11.2009 23:52
Строка brutos Общие вопросы Delphi 2 19.05.2009 13:01
Строка Стасссс Помощь студентам 5 21.04.2009 17:34
строка Артэс Общие вопросы C/C++ 4 04.02.2009 21:56
Строка состаяния или загрузачная строка Sergeu Мультимедиа в Delphi 8 27.08.2008 10:32