View Single Post
  #3  
Old 03-18-2005, 23:50
aldente aldente is offline
VIP
 
Join Date: Jul 2003
Posts: 266
Rept. Given: 27
Rept. Rcvd 7 Times in 5 Posts
Thanks Given: 36
Thanks Rcvd at 10 Times in 9 Posts
aldente Reputation: 7
The Url is also in the source code (Url-encoded), i think
it's probably easier to implement decoding and parsing that, instead of
the JavaScript-Way, as you just need to download that
page, and do not need to interpret it (neither HTML nor
JavaScript). Here is my little Delphi-function:

Code:
function DecUrlEncStr(const InpStr: String): String;
var
  i: Integer;
begin
  SetLength(Result, Length(InpStr) div 3);

  for i := (Length(InpStr) div 3) downto 1 do
    Result[i] := Chr(StrToInt(LowerCase('$' + InpStr[i*3-1] + InpStr[i*3])));
end;

Last edited by aldente; 03-19-2005 at 03:28.
Reply With Quote