| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Определить подстроку в строке [D6, Win2k, WinXP]

Sergy ©   (2002-02-18 12:15:00) 

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

---

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

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

---

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


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"

---

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

См. у TStringList:

Commatext
Names
Values

---

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

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

---

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

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

---

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

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

---

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

см. функцию pos

---

Наверх