请问如何在中把一串字符串转换为ASCII码字符串? 如:123->313233当然字符的ASCII码可能大于128 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 自己写一个函数不就得了Founction GetASC(Str:String):String;var i:integer;begin Result:=''; for i:=0 to Length(str) do Result:=Result+Ord(Str[i]);end; 上面应该是for i:=1 to Length(str) do吧 Result:='';for i:=1 to Length(str) do Result:=Result+Ord(Str[i]); 还有一点:Result:=Result+inttostr(Ord(Str[i])); intotstr是返回十进制ASCII我需要的是十六进制的ASCII继续等待........... inttohex将十进制转成十六进制。 急問: 請問有人用Delphi寫過對Godex EZ1100條碼打印機的指令調用嗎 大家快来看呀,我这也有错吗 急!!!谁有五笔编码表(最好是access格式的) 100分请笑纳!!!! 菜鸟求教 checkbox 怎样在我的程序中接收另一个应用程序发来的自定义消息?(在线等待..) 谁有人事劳资方面的设计文档给我一份,多谢了! DELPHI6.0中文版下载?D版 大家详细解释一下delphi中一些先进的技术名词吧 求帮助,求指教 怎样知道dbgrid选择了那一行? 怎样让左键弹出菜单跟随鼠标? 关于插入数据的问题
var
i:integer;
begin
Result:='';
for i:=0 to Length(str) do
Result:=Result+Ord(Str[i]);
end;
for i:=1 to Length(str) do Result:=Result+Ord(Str[i]);
继续等待...........