Как в место символов отобразить *

← →
Nikos (2003-05-06 15:11) [0]

Вопрос избитый, но не где не нашел. Мне нежно, чтобы в поле edit, при вводе символов, отображались *, в место введенных символов, а в переменную запоминался введенный текст.

← →
Verg © (2003-05-06 15:15) [1]

Edit1.PasswordChar:="*";

← →
Akni (2003-05-06 15:17) [2]

У edit"а выставляешь значение свойства PasswordChar в *. И все.

procedure TForm1.FormCreate(Sender: TObject);
begin
edit1.PasswordChar:="*" //можно и в Object Inspector
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(edit1.text)
end;

ЯХДР

Как в место символов отобразить * Найти похожие ветки