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

Вниз

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

 
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 и его (в его реализации) регулярные выражения :)



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

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

Наверх




Память: 0.47 MB
Время: 0.007 c
1-19218
Lokk
2002-02-19 14:45
2002.03.07
Ttimer


14-19352
Z
2002-01-16 01:29
2002.03.07
>Получение и установка видеорежимов в Windows


14-19310
Свой
2002-01-17 23:30
2002.03.07
icq i его ip


1-19136
Turalyon
2002-02-21 09:01
2002.03.07
Проблема с сервисами


14-19348
Сержик
2002-01-24 15:59
2002.03.07
А чё, правда, что Delphi6 на русском языке бывает?