delphi中将UCS2编码的字符串转化为GB2312编码的简单方法

原创 2004年09月03日 22:19:00

最近在做一个短信相关的项目。从联通网关deliver过来的短信都是ucs2编码的。

在网上找了些资料,找到一些使用java语言本身带的api转换的代码,但没有合适的delphi源码,所以经研究后自己写了一个,很简单的:

function Ucs2ToGBK(const InValue: string): string;
var
  I: Integer;
begin
  Result := '';
  for I := 1 to length(InValue) div 2 - 1 do
    Result := Result + WideChar(StrToInt('$' + IntToHex(Ord(InValue[2 * I - 1]), 2)
                                             + IntToHex(Ord(InValue[2 * I]), 2)));
end;

Delphi的unicode与GB2312转转换, 汉字unicode转GB2312

Delphi的unicode与GB2312转转换, 汉字unicode转GB2312 {=======================================================...
  • haiou327
  • haiou327
  • 2010年10月04日 13:35
  • 858

utf8与ucs2编码互转及原理

原文:http://liangguanhui.iteye.com/blog/558849 我们都知道对于UNICODE来说,UCS-2是内码,而UTF-8则是它的实现方式。每一个字节都有8个...
  • macrohasdefined
  • macrohasdefined
  • 2013年10月18日 12:46
  • 728

delphi下中文转UFT-8编码

delphi下中文转UFT-8编码
  • rznice
  • rznice
  • 2016年01月08日 14:50
  • 3834

Delphi7 中文汉字转网址格式 Utf8编码转换(淘宝搜索中文转网址)

function HttpEncode(S:AnsiString):string; var   P:^Byte;   I:Cardinal; begin   Result:='';   P...
  • xtfnpgy
  • xtfnpgy
  • 2016年03月09日 21:51
  • 1170

短信发送接收时的UCS2编码转换处理

其实UCS2这种编码不像GB2312、UTF-8等,它并不属于任何语系的语言编码,实际上是一种编码格式的世界语。在这个世界上所有可以在计算机中使用的语言都有对应的UCS2编码。 正是因为Ja...
  • chen517611641
  • chen517611641
  • 2016年03月10日 20:57
  • 2532

实现UTF-8、UCS2编码和解码

编码的原理知识可以看:https://www.zhihu.com/question/23374078 public void encodeDecode(){ String str...
  • michael_yt
  • michael_yt
  • 2017年04月20日 14:01
  • 963

VC UTF-8与中文(GB2312)相互转换

#include using namespace std;/**********************************************************************...
  • aidy22
  • aidy22
  • 2009年08月04日 11:12
  • 6672

关于delphi中url文件下载编码问题(处理里面含有空格,汉字,字符)

不管是用indy控件,还是ics控件,用http下载文件的时候都会遇到,url含有汉字,空格,其他字符之类的符号,直接用utl是不行的,除非是英文状体下的字符。 需要把url编码,才能正确的下载。 ...
  • lenovo455
  • lenovo455
  • 2013年11月20日 18:08
  • 1049

SIM卡中UCS2编码的三种格式(80,81,82)分析

操作SIM卡中的数据操作主要有两个地方,一个是短信操作,还有一个通讯录操作,两种编码略有差别: 1、短信息操作:     在短信息中,默认一条短信的最大长度为140个字节。     纯ASCII字符主...
  • zx249388847
  • zx249388847
  • 2016年09月02日 13:24
  • 559

Python字符串的encode与decode研究心得乱码问题解决方法

先讲述一些编码的概念以及区别!!!!!!!! UNICODE,GBK,UTF-8区别     简单来说,unicode,gbk和大五码就是编码的值,而utf-8,uft-16之类就是这个值的表...
  • lcaluziforever1314
  • lcaluziforever1314
  • 2013年06月24日 12:29
  • 1690
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:delphi中将UCS2编码的字符串转化为GB2312编码的简单方法
举报原因:
原因补充:

(最多只允许输入30个字)