Delphi 10 と Windows 10 を使用しています。
次のコードは、Edit1 でキャレットと選択を非表示にします。
procedure TForm1.Edit1Enter(Sender: TObject);
begin
Edit1.PasswordChar := '*';
end;
フォーカスが他のコントロールに移動した後、onClick でうまく機能します。
フォーカスはタブキーで移動し、フォーカスが入る前に「パスワード」であるテキストを保持するため、Edit1 はデフォルトの #0 で開始する必要があるため、onClick を使用できません。
どうすればこれを解決できますか?