[Adrenalin666]

Код:

var
html:TStringList;
begin
html:=TStringList.Create;
html.text:=idhttp.get('http://vkontakte.ru/login.php?email=ваш_майл&pass=ваш_пароль&expire=0' );//взяли исходный код

preg_match("<a class="memLink" href=(.+?)<div class="actions">",$income_str,$out_arr);//нашли текст

а дальше как