我想把一个TEdit控件中的字符按ascii码付给一个integer型的数组,不知如何下手,望高手指点,^__^

解决方案 »

  1.   

    刚答了一个类似问题就拿来你用吧由于string类可以作为树组使用,只要对字符串进行遍历循环,就可以如
    var
    s:sting;
    i,j:integer;
    声明一个数组为ingeger类的 为arr//对不起,忘记怎么声明了,你查查看
    begin
    s;=edit1.text;
    for i:=1 to length(s) to
      begin 
       j:=ord(s[i]);
       arr[i]:=j;
      end;
    end;数组的道理一样,给分吧,后面的别补充了,已经很详细了,不行给我发消息
      

  2.   

    声明一个数组为ingeger类的 为arr//对不起,忘记怎么声明了,你查查看var arr[]: array of integer;
    setlength (arr,length(s));