Показать сообщение отдельно
  #5  
Старый 24.12.2008, 17:02
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,098
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Код:
put := ExtractFilePath(name);
Ответить с цитированием