парсинг,проблема

[Gdasar]

Ну в общем есть вот такой текст:

HTTP/1.1 302 Found
Location= https://www.google.ru/search?client=opera&q=css&sourceid=opera&ie=utf-8&oe=utf-8&channel=suggest
Cache-Control= private
Content-Type= text/html; charset=UTF-8
Set-Cookie= PREF=ID=ab59915634e3aec4:FF=0:NW=1:TM=1379265186:LM=1379265186:S=gaQPpU4gQ2KkN3r3; expires=Tue, 15-Sep-2015 17:13:06 GMT; path=/; domain=.google.ru
Set-Cookie= NID=67=MPyOuAKGfYG6K1gd8h685NzyJ_ixVS1Ot0Xsh3CL5o3cc8a_4kQJL4I0PCvu8DVBRYw9ggE7ySP9a_gHjV5wQ6vScSpOeIvBNhTxK3nr-tJm-WprW7D0XWTQV6LAQP7d; expires=Mon, 17-Mar-2014 17:13:06 GMT; path=/; domain=.google.ru; HttpOnly
P3P= CP="This is not a P3P policy! See http://www.google.com/support/accounts/bin/answer.py?hl=en&answer=151657 for more info."
Date= Sun, 15 Sep 2013 17:13:06 GMT
Server= gws
Content-Length= 313
X-XSS-Protection= 1; mode=block
X-Frame-Options= SAMEORIGIN
Alternate-Protocol= 80:quic

Мне нужно спарсить значение Location,но не получается
Вот мой код парсинга:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
String Result;
int a;
TStringList* List=new TStringList();
List->Text=Memo1->Text;
	for(int i=0;i<List->Count;i++)
	{
		if(a=List->Strings[i].Pos("Location= ")!=0)
		{
		  Result=List->Text.SubString(a=10,List->Strings[i].Length());
		  break;
		}
	}
   Edit2->Text=Result;
}

Программа возвращает вот это:

02 Found
Location= https://www.google.ru/search?client=opera&q=css&sourceid=opera&ie=utf-8&oe=utf-8&chann

Хотя должна возвращать:

 https://www.google.ru/search?client=opera&q=css&sourceid=opera&ie=utf-8&oe=utf-8&channel=suggest

Что я не так делаю?

[BDA]

А так?

Result=List->Strings[i].SubString(10,List->Strings[i].Length());

[Gdasar]

BDA,да,работает
Сглупил я Нужно было из итой строки сохранять,а я из всего текста Не внимательный...