delphi - 如何在编辑框中显示标签，但在获得焦点时切换到密码输入模式？

Question

我使用 Delphi 10 和 Windows 10。

以下代码使插入符号和选择在 Edit1 中消失。

procedure TForm1.Edit1Enter(Sender: TObject);
begin
  Edit1.PasswordChar := '*';
end;

在焦点移动到另一个控件并在 onClick 之后，它运行良好。

我不能使用 onClick，因为焦点按制表键移动，并且 Edit1 应该以默认 #0 开头，因为它在焦点进入之前保存了“密码”文本。

我该如何解决这个问题？

Answer 1

编辑控件按设计和预期工作。

• 如果您希望控件隐藏密码，然后TEdit.PasswordChar在 OI 或创建时设置，或者......但不是每次进入控件时
• 如果您想获得提示，请设置TEdit.TextHint将在TEdit.Text为空且控件未聚焦时显示的属性