这个问题 我纠结了一天了！  希望大虾 赐教啊！

procedure TForm1.Button1Click(Sender: TObject);
VAR
str1,str2:string;

a:integer;
begin
   str1:=memo1.Lines.GetText();
   str2:=copy(str1,1,1);
 
end;

end.

这是我写的代码 ！ 只要求有memo控件！

  将用户输入的字符全部统计  比如说   gfdsafsd3124324     、、‘【】
  这里有8个  字母7个数字 7个其他字符！  我想把它们字符一个一个拿出来  算出ascii 码  比较
  像  c语言  里面一样    可是  无法取出  memo 里面的字符（可以取出字符串）；怎么把字符串里面字符一个个取出来 变成字符啊！
  delphi 有这样的方法吗！  求解啊！  

对啊！   可以把里面的字符单独取出来与   字符比大小吗！