Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 190

Раздел: Delphi » Прочее
/ вопрос решён /

Здравствуйте эксперты!
прошу прощения за ламерский вопрос, я учусь программировать на Delphi. Есть строка с путем к некоторому файлу, например: D:\catalog\file.exe, как мне отбросить имя файла и оставить только имя одного каталога, например получая эту строку через TOpenDialog.
Спасибо за ответ.

Sonic-X Вопрос решён, но можно продолжить его обсуждение в мини-форуме

Вопрос задал: Sonic-X (статус: Посетитель)
Вопрос отправлен: 9 декабря 2006, 02:15
Состояние вопроса: решён, ответов: 2.

Ответ #1. Отвечает эксперт: Dron

Здравствуйте, Alexey!
Это можно сделать с помощью функций ExtractFilePath и ExtractFileDir. Их отличие состоит только в том, будет ли у выданного пути слеш "\" в конце... Первая выдаёт путь вместе с ним, вторая - без него. Использовать функции очень легко - в скобках нужно указать строку в явном виде, либо строковую переменную, а на выходе прочитать значение. См. пример в приложении. Удачи!

Приложение:
  1. Var
  2. Path1,Path2: String;
  3. Begin
  4. Path1:='D:catalogfile.exe';
  5. Path2:=ExtractFilePath(Path1);
  6. End;


Ответ отправил: Dron (статус: Студент)
Время отправки: 9 декабря 2006, 08:15
Оценка за ответ: 5

Ответ #2. Отвечает эксперт: Дима Гусаков

Здравствуйте, Alexey!
if OpenDialog1.Execute then
Label1.Caption := ExtractFilePath(OpenDialog1.FileName);

Ответ отправил: Дима Гусаков (статус: 2-ой класс)
Время отправки: 9 декабря 2006, 13:42
Оценка за ответ: 5


Мини-форум вопроса

Всего сообщений: 0.

31 января 2011, 19:24: Статус вопроса изменён на решённый (изменил модератор Ерёмин А.А.): Автоматическая обработка (2 и более ответов с оценкой 5)

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 21 октября 2017, 11:37
Выполнено за 0.15 сек.
Рейтинг@Mail.ru