Question

delphi初学者提问，如何把Edit1中的内容，赋值给变量a，代码怎么写

同上
如：edit中的内容为123，如何把值赋给变量a
如果edit中的内容为123，如何实现把第一位（1）赋给x，第二位（2）赋给y，第三位赋给z

Answer 1

var
x,y,z : char;
a : string;
begin
a := edit1.Text; //123
x := a[1]; //1
y := a[2]; //2
z := a[3]; //3
end;