如何实现Delphi TEdit控件中插入符号的隐藏？

本文共计150个文字，预计阅读时间需要1分钟。

我想从Delphi中的TEdit控件中删除插入符号。我已经设置了组件的Enabled属性为False，但插入符号仍然出现。我的问题是，如何从禁用的TEdit控件中删除插入符号？我假设你的意思是TEdit控件。解决方案是。

我想从Delphi中的TEdit控件中删除插入符号.我已经使组件Enabled：= False但是插入符号仍然出现.
我的问题是如何从禁用的TEdit控件中删除插入符号？ 我假设你的意思是TEdit控制.

解决方案是HideCaret功能,唯一的问题是在哪里调用它.下面的2个事件处理程序对我来说很好：

procedure TForm18.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin HideCaret(Edit1.Handle); end; procedure TForm18.Edit1MouseEnter(Sender: TObject); begin HideCaret(Edit1.Handle); end;