function URLDecode(psSrc: string): string;
{
/// URLDecode modified by Kingron,
/// Support IE6 URL encode: %u3FE5%uA805test
}
var
i: Integer;
ESC: string[2];
CharCode: integer;
WESC: string[4];
begin
result := ''; { do not localize }
psSrc := StringReplace(psSrc, '+', ' ', [rfReplaceAll]); {do not localize}
i := 1;
while i <= Length(psSrc) do
begin
if psSrc[i] <> '%' then { do not localize }
begin {do[1] [2] [3] [4] 下一页
|
|
