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




Вниз

Определить подстроку в строке 


Sergy   (2002-02-18 12:15) [0]

Задача до банальности проста, но ничего грамотного в голову не лезет:
есть строка : "1=aaa,2=bbbb,7=ccc,4=qqq"
Как из этой строки выделить подстроку "7=ccc"?



Alx2   (2002-02-18 12:19) [1]

см. функцию pos



MBo   (2002-02-18 12:21) [2]

также см. Copy и TStringList.Commatext



Sergy   (2002-02-18 12:23) [3]

>Alx2. Если я заранее не знаю, что это "7=ccc", а может это будет "7=lllll", то как мне воспользоваться фунцией POS&



Alx2   (2002-02-18 12:30) [4]

>Sergy (18.02.02 12:23)
Ищи позицию "7=" и далее смотри чему оно равно.
Вообще, следует более детально описать, что значит "выделить подстроку"



Юрий Зотов   (2002-02-18 12:34) [5]

См. у TStringList:

Commatext
Names
Values



Alx2   (2002-02-18 12:53) [6]


function GetValue(Const subStr,FromStr:String):String;
Var id : Integer;
begin
Result := "";
Id := pos(subStr,FromStr);
if Id>0 then
begin
Result := Copy(FromStr,Id+Length(SubStr),Length(FromStr));
Id := pos(",",Result);
if Id>0 then
SetLength(Result,Id-1);
end;
end;

Пример:
GetValue("1=","1=aaa,2=bbbb,7=ccc,4=qqq") = "aaa"



[NIKEL]   (2002-02-18 13:43) [7]

и невольно вспоминаешь про Perl и его (в его реализации) регулярные выражения :)




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




Наверх





Память: 0.72 MB
Время: 0.022 c
3-19105           alexts                2002-02-11 11:06  2002.03.07  
AutoIncrement


14-19317          PEC                   2002-01-21 15:39  2002.03.07  
как воспользоваться командой !


14-19351          Херувим               2002-01-19 21:45  2002.03.07  
Как юзать TStream и его потомков...


14-19327          Zevsus                2002-01-20 22:41  2002.03.07  
Найти активное приложение


6-19274           Serg!                 2001-12-19 12:18  2002.03.07  
Подскажите плз как заставить net send egor message принимать мессаги на компе с 9Х/МЕ