Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];

Вниз

Вычленить имя конечной папки   Найти похожие ветки 

 
dest   (2006-12-08 13:24) [0]

Как мне из ExtractFilePath(Application.ExeName) вычленить только имя конечной папки умным способом?

Есть ли что-то вроде функциии StrPos, только возвращяющей указатель не на первое вхождение, а на то, какое мне нужно.

Что-то вроде:
FIELD(SSS,DCOUNT(SSS,"\"),"\")


 
Elen ©   (2006-12-08 13:34) [1]


> Как мне из ExtractFilePath(Application.ExeName) вычленить
> только имя конечной папки умным способом?


caption:=ExtractFilePath(ExtractFilePath("c:\temp\ddd")); Умно?


 
stone ©   (2006-12-08 13:35) [2]

ExtractFileName(ExtractFileDir(Application.ExeName))


 
Anatoly Podgoretsky ©   (2006-12-08 13:38) [3]

> dest  (08.12.2006 13:24:00)  [0]

Используй цикл по ExtractFilePath


 
Anatoly Podgoretsky ©   (2006-12-08 13:42) [4]

> stone  (08.12.2006 13:35:02)  [2]

Это далеко не конечная папка.


 
Elen ©   (2006-12-08 13:43) [5]


> Используй цикл

А кто говорил что циклы не модно?


 
Elen ©   (2006-12-08 13:45) [6]


> Это далеко не конечная папка

Конечная с какого конца? того что начало или конец?


 
Anatoly Podgoretsky ©   (2006-12-08 14:16) [7]

> Elen  (08.12.2006 13:43:05)  [5]

Мода, этакая штука, чуть опоздал уже не модно.


 
Anatoly Podgoretsky ©   (2006-12-08 14:17) [8]

> Elen  (08.12.2006 13:45:06)  [6]

Жалко, что не кольцо, а то бы заставили там искать конец.


 
dest   (2006-12-08 14:18) [9]

> Anatoly Podgoretsky ©   (08.12.06 13:42) [4]

Ну это точно даст верный разультат, но, конечно, громоздко......

ExtractFilePath(ExtractFilePath("c:\temp\ddd")); Умно?

Не знаю насколько это правильно....
Но судя потому что Anatoly Podgoretsky "не высказался", может и да... )


 
dest   (2006-12-08 14:18) [10]

Опоздал..... )



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.241 c
15-1164917477
Bew
2006-11-30 23:11
2006.12.24
Формула реккурентной последовательности.


1-1162984667
Димыч
2006-11-08 14:17
2006.12.24
Прилипание дочерних окон к главному окну


2-1165477223
TrainerOfDolphins
2006-12-07 10:40
2006.12.24
Приложение не стартует на других машинах...


15-1164938781
PHPDeveloper
2006-12-01 05:06
2006.12.24
регистраторы программ


15-1165149507
vrem
2006-12-03 15:38
2006.12.24
delphi 2006 и 64 бита





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский