q:=pos('<a class="memLink" href=',source)+27; while source[q]<>'<' do begin itog:=itog+source[q]; inc(q); end;