代码如下

procedure TForm1.Edit1Enter(Sender: TObject);
begin
showmessage('请输入右边显示的验证码');
Button5.Enabled:=ture;
end;


但是edit1获得焦点后
没有信息出来

button5还是false

请教问题出在哪？