能不能用edit里的内容做变量依据？
我有一个常量，比如A ＝ 'abc '，现在想用一个edit输入一个内容，加入我键入了 A 能不能在showmessage edit的内容的时候显示的是 abc ，而不是我输入的 A ？

const
A = 'abc ';
procedure TForm1.Button1Click(Sender: TObject);
var
B : string;

begin

B := edit1.Text; //这里输入 A

showmessage(B); //怎么才能让这里的内容 ＝ A 的常量 ‘abc’？
end;
end.

[解决办法]
不可以，假设我现在输入Z那我应该出来的是什么结果。
还是老实点吧
B := edit1.Text; //这里输入 A
if b= 'A ' then showmessage(A); //怎么才能让这里的内容 ＝ A 的常量 ‘abc’？
end;
end.