Well, I think I see what you mean, And I tried this out, and it works perfectly now. 
SCAR Code:
program Stats;
var
position:integer;
s: string;
Player,title,level,rank,exp: string;
begin
Player:=readln('Who do you wish to check? (Main server)');
Player:=lowercase(player);
s:= getpage('http://eoinfo.no-ip.org/etop250.html');
s:= between('<BODY><FONT FACE="Verdana"><H2>Top 250 players for the Main Server</H2><TABLE class="topl" style="font-size: 16px;font-family: ''Verdana'';font-style: normal;font-weight: normal;" WIDTH="900"<TR><TD WIDTH="80"><B>Rank</B></TD><TD WIDTH="140"><B>Name</B></TD><TD WIDTH="170"><B>Title</B></TD><TD WIDTH="100"><B>Experience</B></TD><TD WIDTH="60"><B>Level</B></TD><TD WIDTH="90"><B>Gender</B></TD><TD WIDTH="120" NOWRAP="NOWRAP"><B>Rank Change</B></TD><TD WIDTH="100"><B>Flags</B></TD></TR>','</TABLE><P><A HREF="mailto:cascade42@gmx.net">cascade42@gmx.net</A></FONT></BODY></HTML>',s);
player:=trim(player);
position:=pos(player,s);
delete(s,position+81,+100000);
S:=trim(s);
Writeln('Player: '+player);
rank:=copy(s,position-13,4);
rank:=trim(rank);
delete(s,0,position);
writeln('Rank: '+rank);
title:=(Between('</TD><TD>'+player+'</TD><TD>', '</TD><TD>', s));
Title:=trim(title);
writeln('Title: '+title);
exp:=(Between('<TD>'+title+'</TD><TD>', '</TD><TD>', s));
exp:=trim(exp);
writeln('EXP: '+exp);
level:=(Between('</TD><TD>'+title+'</TD><TD>'+exp+'</TD><TD>', '</TD><TD>', s));
writeln('Level: '+level);
end.