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

Вниз

string   Найти похожие ветки 

 
uu   (2003-10-03 15:27) [0]

Подскажите как из строки вида......

c:\dir1\dir2\TEST

и сторки

C:\dir1\dir2\ получить строку TEST ?

строка TEST может быть произвольной... т.е. как 12345 так и qwerty


 
PVOzerski   (2003-10-03 15:33) [1]

Что вы имели в виду-то?
Не это же:
var s:string="c:\dir1\dir2\TEST" ... s:="TEST" :^)

Я думаю, задачу надо бы сформулировать более внятно. Пока же навскидку:

1) Использовать ExtractFileName - эта функция ведь не будет проверять, является ли TEST в действительности файлом.
2) С помощью Pos найти место вхождения "TEST" в строку


 
VAleksey   (2003-10-03 15:34) [2]

ShowMessage(Copy("c:\dir1\dir2\TEST",Length("c:\dir1\dir2\")+1,Length("c:\dir1\dir2\TEST")-Length("c:\dir1\dir2\")));


 
PVOzerski   (2003-10-03 15:36) [3]

Можно еще перебором в цикле справа налево найти первый бэкслэш.


 
dataMaster   (2003-10-03 15:38) [4]

var
s: string;
s:=_твой_путь_;
while pos("\", s)>0 do
delete(s, 1, 1);


 
Song   (2003-10-03 15:40) [5]

StrRScan - найдёшь посдений слэш.
Чем ExtractFileName() не нравится?



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

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

Наверх





Память: 0.45 MB
Время: 0.01 c
9-51050
Knight
2003-04-14 22:22
2003.10.16
Тетрис - слабое звено...


3-51149
rosl
2003-09-24 11:51
2003.10.16
fasreport


6-51377
Blondin
2003-08-19 14:21
2003.10.16
idPOP3 - Coding table entry not found


14-51515
pasha_golub
2003-09-26 16:54
2003.10.16
Аналог GetTickCount во FreePascal


1-51204
ikivio
2003-10-03 11:04
2003.10.16
HotKey в системе.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский