Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.08.2008, 13:21   #1
StartMis
Форумчанин
 
Регистрация: 21.04.2008
Сообщений: 175
По умолчанию Поиск

Подкажите как в переменной a:='C:\WINDOWS\addins\sss\ррр' можно опредилить что есть папки addins\sss\ и потом присвоить переменной b все что после этих папок.
StartMis вне форума Ответить с цитированием
Старый 25.08.2008, 13:50   #2
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,645
По умолчанию

Код:
d:= pos('addins\sss\', a);
if d > 0 then b := copy(a, d + 11, length(a) - d - 10)

Последний раз редактировалось eoln; 25.08.2008 в 13:53.
eoln вне форума Ответить с цитированием
Старый 25.08.2008, 13:56   #3
Jupiter
Пользователь Подтвердите свой е-майл
 
Регистрация: 26.03.2008
Сообщений: 42
По умолчанию

можно и так:
Код:
b := ExtractFileName(a);
Jupiter вне форума Ответить с цитированием
Старый 26.08.2008, 10:21   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
ExtractFileName(a);
Это помоему даст только последнюю папку.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 26.08.2008, 11:15   #5
GN_
Пользователь
 
Аватар для GN_
 
Регистрация: 25.11.2006
Сообщений: 86
По умолчанию

function DirectoryExists(const Directory: string): Boolean;
Мой ник - GN
GN_ вне форума Ответить с цитированием
Старый 26.08.2008, 13:48   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от GN_
function DirectoryExists(const Directory: string): Boolean;
GN_, это Вы к чему написали?!.. :-(

добавлено
Кажется понял... Это Вы к этому:
Цитата:
можно опредилить что есть папки addins\sss\
... :-)
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Поиск в бд KAKTYC SQL, базы данных 3 25.07.2008 13:21
поиск Азамат Microsoft Office Excel 7 18.06.2008 13:44
ПОИСК В БД HOMER БД в Delphi 2 20.12.2007 21:41
Поиск по FTP Averss PHP 4 04.09.2007 20:37
Поиск Andr Microsoft Office Excel 2 18.07.2007 11:49