16

入力ボックス:

answer:=Inputbox('a','b','c');

うまく機能しますが、入力された文字の代わりに小さな星しか表示されないパスワードボックスのような、マスクされたものを探しています。

4

6 に答える 6

40

XE2 ではInputBox()、入力InputQuery()のマスキングをネイティブにサポートするように更新されましたがTEdit、その機能はまだ文書化されていません。パラメータの最初の文字がAPrompt任意の値 <#32に設定されている場合、TEdit.PasswordCharは に設定されます*。例:

answer := InputBox('a', #31'b', 'c');
于 2014-01-14T20:02:20.880 に答える
9

InputBox は、フォームを動的に作成するダイアログの InputQuery 関数を呼び出します。いつでもこの関数のコピーを作成して、TEdit の PasswordChar プロパティを変更できます。

于 2009-02-26T17:24:45.080 に答える
3

私は、Delphi がすぐに使えるものを含んでいるとは思いません。おそらく、 http://www.torry.net/またはネットの他の場所で見つけることができます。それ以外の場合は、自分で作成するだけです。それほど難しいことではありません。:-)「十分に大きな」Delphi バージョンがあれば、ソース コードを見ることもできます。

ウリ。

于 2009-02-26T17:18:56.563 に答える
0

InputBox の代わりに InputQuery を使用できます。TRUE 引数が設定されている場合、パスワード フィールドはマスクされます。

InputQuery('Authenticate', 'Password:',TRUE, value);

ここにいくつかのリソースがあります。http://lazarus-ccr.sourceforge.net/docs/lcl/dialogs/inputquery.html

于 2018-07-27T10:15:17.497 に答える