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 随机函数单元urandomutils

Delphi 程序动态改变皮肤

Delphi fdlocalsql使用方法

Delphi 关于字符串, 之前没这样用过

Delphi 取正在运行的dll或exe的路径

Delphi二进制字符串转换成中文字符串

Delphi mysql里Delphi事件类型转unix时间戳

[Delphi]钩子(hook)机制的使用

Delphi判断exe文件是否正在运行的函数

Delphi 查看字符串在不同编码(ascii、unicode、utf7、utf8、default、bigendianunicode)下的 hex

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

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