show.asp?sort=全部&sortlevel=1&gorq=供&n=5&sitename=全部&img=yes&imgfile=/images/dot_g.gif
诸如这样的形式,在百度查询会转成GB2312的编码,每个汉字对应2个%xx%xx ,但是在google,每个汉字则对应的三个%xx%xx%xx,采用的是unicode编码
在delphi2010中,因为引入unicode的缘故,默认的成了3个%xx,导致我的程序出现问题,找了半天,每一个函数能够实现全URL的自动检测编码,所以自己写了一个,共享给大家:
uses
httpapp;
function urlencode(Aurl: string): string;
var
i: integer;
stmp,Tstmp: string;
begin
result:=Aurl;
if length(Aurl) > 0 then
begin
for i := 1 to length(Aurl) do
begin
if Integer(Ord(Aurl[i])) >255 then
begin
stmp := copy(Aurl, i, 1);
Tstmp:=HttpEncode(stmp);
result:=stringreplace(result,stmp,Tstmp,[]);
end;
end;
end;
end;
使用:
URL :=urlencode(URL);
则URL中的汉字自动转为gb2312的%xx的编码。
分享到:
相关推荐
解决思路:进行Base64前先进行URL编码,在进行URL编码的时候,注意设置不需要SpaceAsPlus选项。 javascript代码: let decodedData = window.atob(JSONStr); let decodedData1 = decodeURIComponent(decodedData)...
DELPHI中获取汉字ASCII的例子 之前一直对这一块比较陌生
本源码是我写的一个小工具,用于斯凯平台开发 功能:汉字转16进制编码(unicode bigend)
delphi XE10汉字转拼音,支持FireMonkey 多汉字转换,这东西主要就是编译,用吧,用吧
Delphi编程获取汉字拼音(简拼、全拼皆可)单元 1.支持D7——D2010(XE没有测试过,但是应该没有问题); 2.支持全拼和简拼获取; 3.支持的汉字非常全面; 使用说明:1.在项目中需要的地方引用Spell单元; 2.调用...
Delphi 通过查询资源文件 wbtext.rec 得到编码,得到汉字的五笔、拼音编码 (支持 7500个简体、繁体汉字) 1、批量将汉字转换为拼音码、拼音简码、五笔码、五笔简码。 2、通过ODBC建立“.mdb”数据库,名字为...
由于delphi7和delphi2010的汉字编码不同,汉字转拼音在d7下可以通过,在d2010下就需要修改代码,这个附件是修改过的,在d7和d2010都可以实现汉字与拼音的转换,给需要的朋友
DELPHI中计算汉字笔划的函数,可以直接调入使用
Delphi url 编码及转码及特殊字符串替换--百度和腾讯用的就是这个.mht
用Delphi实现数字与汉字的转换源码
delphi字符串汉字统计小例子,可以用在短信软件开发上,统计汉字数。
Delphi字符编码转换工具,原创代码,作者Author: 谢凯。输入一段字符串(汉字或者英文),可将其转换为Unicode编码或AscII编码。 其中有一段代码避免程序的重复执行(调试通过),原理:在程序启动时将Application的...
Delphi按键转汉字,模拟输入法,模拟输入法小程序by 麻子,演示了安装钩子、消息循环、卸载钩子、清除托盘、清除菜单、清除窗体等功能。
网上查询了很多汉字转拼音的方案,一种是用VBA实现的,另一种是只能转汉字首字母,都不是我需要的方案,因此结VBA的方式,用Delphi实现汉字转拼音全拼的方法,对excel文件中的中文转成拼音后,写入excel其他列中,并...
1、输入字符串 2、拆解字符串,需要用可以分开汉字和字母的函数 3、如果是汉字,取得首字符,如果是字母和数字,直接取来用
Delphi中取得汉字的首字母(十分巧妙).mht
Delphi 汉字繁简转换
Delphi7 计算汉字的笔划有几划,输入一个汉字,本程序将计算出这个字有多少笔划,最后将结果将输出一个整数。
一个基于FFMpeg的Delphi视频解码、编码、合并的例子
delphi获取汉字拼音的源代码,可以获得汉字的完整拼音。也可以获取声母。