Delphi 如何解码 HTML 的编码 在线急等，谢谢谢谢了 (100分)

H

huawdg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #1

我用 WebSnap 编程，
在 HTML 文件中，用了JScript 的 escape 函数给字符串编码。
编码后的字符串提交到应用程序后，应用程序怎样将其恢复为原字符串？
有没有这样的函数？
如果没有，应该怎样实现？

 

C

copy_paste

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #2

HttpAPP.pas

那有两个函数。
function HtmpDecode(const AStr: string): string;
function HtmpEncode(const AStr: string): string;

 

H

huawdg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #3

帮助文档中竟然没有提及这两个函数!!

我刚试了一下，没有效果，是不是我使用不当？
s:=HTMLEncode('中国人');
查看 s 的值，仍是 '中国人'
而 JSCript 的 escape 函数编码结果为：'%u4E2D%u56FD%u4EBA'
再 s:=HTMLDecode('%u4E2D%u56FD%u4EBA');
查看 s 的值，仍是'%u4E2D%u56FD%u4EBA'。

为何？？？

 

H

huawdg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #4

我又试了试，应该是 HTTPEncode 和 HTTPDecode!!帮助文档中有说明。
但与 escape 不同，escape 是 Unicode 的编码方式，还有什么办法呢？

 

H

huawdg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #5

没有时间等了，先自己编个函数用着。
谁知道的，不要忘记告诉我一声，谢了

 

盛

盛利

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-10

• #6

http://www.delphibbs.com/delphibbs/dispq.asp?lid=1602903
utf8编码的串转成ascii字符
你知道Unicode 的编码方式，编个函数也不难

 

F

freeskying_sy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-04

• #7

想要子函数，我这里有，想要可以告诉我！

 

H

huawdg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-19

• #8

多人接受答案了。