Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.22;
Скачать: CL | DM;

Вниз

Как удалить слово из строки   Найти похожие ветки 

 
VS2001   (2002-07-10 06:29) [0]

Как из строки, например: "c:\program files\common\proga" удалить
слово "\proga", т.е. чтобы осталось c:\program files\common


 
MBo ©   (2002-07-10 07:19) [1]

pos delete

в данном случае подойдут ExtractFileDir и ExtractFilePath


 
Dimich1978 ©   (2002-07-10 08:56) [2]

http://delphibase.endimus.com/?action=viewfunc&topic=winappctrl&id=10260
Посмотри там пример похож, но там разделение на составляющие. Ну думаю и удалить не сложно.


 
Kaban ©   (2002-07-10 09:03) [3]

господи, да удаляй просто по одному символу с конца, пока слэш не встретишь


 
BAY ©   (2002-07-10 09:41) [4]

i:=Length(S);
while S[i]<>"\" do
dec(i);
Setlength(S,i-1);


 
BAY ©   (2002-07-10 09:43) [5]

PS тока в while добавь проверку на отсутствие "\" вообще.
например
...
while (S[i]<>"\") and (i>0) do
...


 
IlyaA   (2002-07-10 09:45) [6]

С начала найди где енто слово находится.
Pos(<слово>,<строка>)
А за тем удали
Delete(<строка>,Pos(<слово>,<строка>),Length(<слово>))


 
Fiend ©   (2002-07-10 09:47) [7]

Помоему самый лучший выход это StringReplace. Ровно одна функция


 
MBo ©   (2002-07-10 10:15) [8]

велосипед для данного случая называется ExtractFileDir


 
Fiend ©   (2002-07-10 10:22) [9]

То MBo ©
это в частном случае Екстракт, а в принципе, если там неизвестно что за строка то StringReplace


 
AlexanderVasjuk ©   (2002-07-10 10:24) [10]

delete(S, LastDelimiter("\", S), MaxInt);


 
Zlobny   (2002-07-10 10:25) [11]

В общем случае может быть полезна функция LastDelimiter(<разделители>,<строка>), которая определяет позицию последнего разделителя(лей) в строке: p:=LastDelimiter("\/",s)



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

Текущий архив: 2002.07.22;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.008 c
1-70821
iii
2002-07-10 15:20
2002.07.22
Реестр. Как избежать ошибки?


3-70671
Aleksandr
2002-07-02 12:26
2002.07.22
Как можно вылечить такую ошибку:


1-70817
Андрусь
2002-07-10 18:37
2002.07.22
реакция на изменение размера


1-70819
Дундук
2002-07-09 07:42
2002.07.22
Работа с датой


3-70590
dimanew
2002-06-27 09:24
2002.07.22
Подскажите как в IB создать генератор, котоый при добавлении