Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вычленить имя конечной папки [D6, XP]

dest © (2006-12-08 13:24:00)
Как мне из ExtractFilePath(Application.ExeName) вычленить только имя конечной папки умным способом?

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

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

dest (2006-12-08 14:18:00) [1]
> Anatoly Podgoretsky © (08.12.06 13:42) [4]

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

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

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

dest (2006-12-08 14:18:00) [2]
Опоздал..... )

Anatoly Podgoretsky (2006-12-08 14:17:00) [3]
> Elen (08.12.2006 13:45:06) [6]

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

Anatoly Podgoretsky (2006-12-08 14:16:00) [4]
> Elen (08.12.2006 13:43:05) [5]

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

Elen (2006-12-08 13:45:00) [5]

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

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

Elen (2006-12-08 13:43:00) [6]

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

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

Anatoly Podgoretsky (2006-12-08 13:42:00) [7]
> stone (08.12.2006 13:35:02) [2]

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

Anatoly Podgoretsky (2006-12-08 13:38:00) [8]
> dest (08.12.2006 13:24:00) [0]

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

stone (2006-12-08 13:35:00) [9]
ExtractFileName(ExtractFileDir(Application.ExeName))

Elen (2006-12-08 13:34:00) [10]

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

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

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »