怎样依次取出一个字符串中的asc码的值? 想用这个值参与运算谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var s:string; i,n:integer;while i<length(s) do beginn:=Ord(s[j]//do somethinginc(i);end; 写错了n:=Ord(s[j]->n:=Ord(s[i] len:=length(name);for i:=0 to len dobeginint asc[i]:=ord(name[i]); cxFontNameComboBox谁用过此控件? combobox显示的问题? delphi中能否在界面上添加一个FLASH文件进去? 如何在不修改数据的情况下增加一个序号字段? 高分求助webbrowser1控件问题,解决立马给分! 我想知道有多少公司使用盗版软件? 小技巧,,,,取得用户当前光标所在纪录的某一项数据(高手见笑了) MIDAS的问题 状态栏图标问题 我是BCB论坛的,想请大家帮帮忙...... 如何取DBGRID中的值????? 导入Excel的问题
while i<length(s) do
begin
n:=Ord(s[j]
//do something
inc(i);
end;
n:=Ord(s[j]->n:=Ord(s[i]
for i:=0 to len do
begin
int asc[i]:=ord(name[i]);