DELPHI 字符转16进制、16进制转字符
来源:互联网 发布:mac的任务栏东西太多 编辑:程序博客网 时间:2024/06/04 00:31
function TForm1.myStrToHex(s:string):string; //字串转16进制
var
TmpStr:string;
i:integer;
begin
TmpStr:='';
for i:=1 to Length(s)do
begin
TmpStr:=TmpStr+IntToHex(ord(s[i]),2);
end;
Result:=TmpStr;
end;
function TForm1.myHexToStr(s:string):string; //16进制转字串
var
HexS,TmpStr:string;
i:Integer;
a:Byte;
begin
HexS:=s;
if Length(HexS) mod 2=1 then
begin
HexS:=HexS+'0';
end;
TmpStr:='';
for i:=1 to(Length(HexS)div 2)do
begin
a:=StrToInt('$'+HexS[2*i-1]+HexS[2*i]);
TmpStr:=TmpStr+Chr(a);
end;
Result:=TmpStr;
end;
摘抄自http://blog.csdn.net/chinazhd/article/details/7578412,转载一份自己留作备忘
- DELPHI 字符转16进制、16进制转字符
- 16进制转字符数组
- Delphi中字符与10/16进制互转换
- Delphi 二进制字符与十进制互转
- Delphi的字符处理
- Delphi编程--字符处理
- DELPHI字符大小写转换
- Delphi操作Unicode字符
- Delphi操作Unicode字符
- Delphi 转换 UTF8 字符为 Unicode 字符
- 压缩 将字符转成16进制 并压缩一半 12字符压缩成6个字符
- Delphi代码优化(字符处理)
- Delphi 例程 - 字符操纵例程
- Delphi判断字符是否中文
- 自定义delphi替换字符函数
- 使用delphi获得字符内码
- delphi 判断字符为中文
- delphi的字符串,字符数组
- filter过滤器详解
- Ubuntu下配置samba服务器
- java String 数据类型的编码方式
- Google Map Place API的初步使用
- (android地图开发) 高德地图自定义标题栏
- DELPHI 字符转16进制、16进制转字符
- AC自动机算法
- 成功IT技术人员除了技术高,还要记住IT从业六要则!
- [CF 295A]Grag and Array[差分数列]
- H.264码流结构
- APP_NAME和项目父目录同名导致!-PUBLIC-!路径问题
- Lex.db 数据库使用方法(之一)
- 一次迭代式开发的研究5:准确的工作量评估
- c#.net连接access操作类