delphi 字符串转换ascii码10进制

本文整理自网络，侵删。

 
function StrToASCII10(s: string): string;    //字符串转换ascii码10进制
var i:integer;
begin
    for i:=1 to length(s) do
    begin
    result:= result + inttostr(ord(s[i]));
    end;
end;
 

相关阅读 >>

Delphi 比较俩组ip地址是否一样

Delphi 获取系统服务service id

Delphi中线程的释放

Delphi httpget 判断链接是否可以访问

Delphi xe5、6、7在android或者ios上使用ansistring和ansichar

vclzip 3.10.1的简单使用示例

Delphi操作ini配置文件

Delphi winapi: inflaterect - 改变矩形大小

Delphi superobject json操作类的基本用法

Delphi if pos 多条件判断用法交流

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 字符串转换ascii码10进制