Question

delphi @edit2.text语句错误？

var mi_ma:array[0..10] of char;
begin
mi_ma:=@edit2.text;

编译错误，
正确的咋写？

Answer 1

var
mi_ma:array[0..10] of char;
begin
move(edit1.text[1],mi_ma,Length(edit1.text));
showmessage(mi_ma[1]);