Разбить ссылку

[reco1123]

Имеется ссылка:

http://sait.ru/index.html#id=51888&text=text132

Как получить то что идет после id= и text= т.е. 51888 и text132

[Dmitry33RU]

C помощью регулярок можно

id=(.*?)&text=(.*?)

id:=RegExpr.Match[1];
text:=RegExpr.Match[2];

[reco1123]

Сообщение от Dmitry33RU

C помощью регулярок можно



id:=RegExpr.Match[1];
text:=RegExpr.Match[2];

id получает а text нет

[WinCoder]

Функции Delete, Copy, Pos.

[reco1123]

Сообщение от WinCoder

Функции Delete, Copy, Pos.

я не разобрался как сделать((

[WinCoder]

Разбирайся. Если я готовое решение дам, ты ни чему не научишься.

[Stilet]

Как получить то что идет после id

Думаю самое простое скомбинировать StringList и Copy
Что-то вроде:

 i:=pos('#',url);
 if i<>0 then With TStringList.Create do begin
  Delimiter:='&';
  DelimitedText:=copy(url,i+1,Length(url));
  ... Тут работать с Values[] как с ассоциативным массивом, передавая ему именя параметров
  free;
 end;

[reco1123]

Сообщение от Stilet

Думаю самое простое скомбинировать StringList и Copy
Что-то вроде:

 i:=pos('#',url);
 if i<>0 then With TStringList.Create do begin
  Delimiter:='&';
  DelimitedText:=copy(url,i+1,Length(url));
  ... Тут работать с Values[] как с ассоциативным массивом, передавая ему именя параметров
  free;
 end;

Можно полный код , я вообще не понимаю как работать с этими pos copy

[Iron Monk]

var
s: string;
begin
     s:= 'http://sait.ru/index.html#id=51888&text=text132';
     Delete(s, 1, Pos('#id=',s)+3);
     s:= StringReplace(s, '&text=', #13#10,[rfReplaceAll]);
     ShowMessage(s);
end;

{************************}

var
s: TStringList;
begin
     s:= TStringList.Create;
     s.Add('http://sait.ru/index.html#id=51888&text=text132');
     s.Text:= StringReplace(Copy(s.Text, Pos('#id=',s.Text)+4, Pos('&text=',s.Text)), '&text=', #13#10,[rfReplaceAll]);
     ShowMessage('id= '+s[0]+ '  ' + 'text= ' +s[1]);
     s.Free;
end;

[NIKOLAYY2]

Через RegExpr уже спарсил и id и text. Работает хорошо.

Но решение давать небуду. Потому что люди незнают даже как RegExpr- шаблоном воспользоваться, судя по теме дня -4 назад была тут. Дети заблудились в трех шаблонах...

По этому ты должен сделать сам, но ты уже знаеш как. Пили регулярку.