各位帮帮我，字符转换成ASCII码的问题？？

Question

本人通过一个EDIT输入的字符，用ORD转换ascii的时候总是出错，这样就通能顺利的完成  ord('c')
                                                    而这样就会出错         ord(edit1.text)请问怎么办？？

Answer 1

var
s:string
ascs:string
begin
  s := 'asdf';
  s1 := '';
  for i :=1 to Length(s) do
    s1 := s1 + ord(s[i]);
end;

Answer 2

ord char
edit.text string

Answer 3

ord是针对单个字符操作的，而你的参数是string，当然会出错