Вытащить hash

Как вытащить hash при редактировании статуса в вк?
delphi

 

Спарсить со страницы конечно

 

а код можно

 

А самому ?

 

Мог сам не спрашивал бы

 

Uns:=http.Get('http://vkontakte.ru/');
Hash:=copy(uns,pos('activityhash',uns),pos('>',uns));
Hash:=Copy(hash,22,32);