Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.13;
Скачать: CL | DM;

Вниз

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

 
Bogdan   (2005-02-27 16:22) [0]

Здравствуйте, такой вопрос: как можно заменить печатающиеся символы на *. Точно так, как при вводе пароля. Благодарен за ответ.


 
begin...end ©   (2005-02-27 16:23) [1]

> Bogdan   (27.02.05 16:22)

Заменить ГДЕ?


 
olookin ©   (2005-02-27 16:25) [2]

Например в событии OnChange


 
begin...end ©   (2005-02-27 16:26) [3]

> Bogdan   (27.02.05 16:22)

Если имеется в виду компонент TEdit, то см. свойство TEdit.PasswordChar.


 
Antonn ©   (2005-02-27 16:26) [4]

2 Bogdan  -->

> Заменить ГДЕ?

Компонент какой?


 
Kerk ©   (2005-02-27 16:29) [5]

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 Key := "*";
end;


 
olookin ©   (2005-02-27 16:30) [6]

[5] Kerk ©   (27.02.05 16:29)

Пробовали? Компилируется?


 
Kerk ©   (2005-02-27 16:32) [7]

olookin ©   (27.02.05 16:30) [6]

KeyPress конечно имелось ввиду :)


 
olookin ©   (2005-02-27 16:34) [8]

[7] Kerk ©   (27.02.05 16:32)

Тогда понятно...


 
Bogdan   (2005-02-27 16:34) [9]

>Kerk ©   (27.02.05 16:29) [5]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Key := "*";
end;

Если это правильно то все ОК!!!
А заменять нужно в TEdit.


 
begin...end ©   (2005-02-27 16:35) [10]

Да, желание изобретать велосипед с квадратными колёсами труднопреодолимо.


 
olookin ©   (2005-02-27 16:38) [11]

[10] begin...end ©   (27.02.05 16:35)

Ну уж велосипед сразу... Лично я бы стал менять содержимое TEdit через его OnChange. Не знал, что можно OnKeyPress использовать (см. Kerk). Так что перефразирую ваш велосипед на свой лад - Век живи, век учись...


 
Antonn ©   (2005-02-27 16:39) [12]

Bogdan   (27.02.05 16:34) [9]
а passwordchar заменить на * никак?


 
Kerk ©   (2005-02-27 16:44) [13]

Antonn ©   (27.02.05 16:39) [12]
а passwordchar заменить на * никак?


[5] - надежнее :)


 
begin...end ©   (2005-02-27 16:45) [14]

> olookin ©   (27.02.05 16:38) [11]

Вы то-сами как считаете - что проще: изменить значение одного свойства или написать целый обработчик?

А теперь внимание - самое главное. Если воспользоваться [3], то после ввода в edit текста в нём будут видны, например, звёздочки (что и требуется), но в свойстве Edit.Text будет введённый текст. А если воспользоваться [2] или [5], то звёздочки, конечно, тоже отобразятся, но в Edit.Text тоже будут одни звёздочки! Ну и зачем нужен такой ввод текста? Чтобы потом подсчитать количество звёздочек?

Так что [3] и [5] - это, уж извините, именно велосипед. И именно с квадратными колёсами.


 
begin...end ©   (2005-02-27 16:46) [15]

> begin...end ©   (27.02.05 16:45) [14]

> Так что [3] и [5] ...

Так что [2] и [5] ...


 
Kerk ©   (2005-02-27 16:48) [16]

begin...end ©   (27.02.05 16:45) [14]
это, уж извините, именно велосипед. И именно с квадратными колёсами.


Зато смешно :)


 
olookin ©   (2005-02-27 16:49) [17]

[14] begin...end ©   (27.02.05 16:45)

Колоссально...


 
Anatoly Podgoretsky ©   (2005-02-27 16:54) [18]

begin...end ©   (27.02.05 16:45) [14]
Трудно сказать, зачем нужно автору символы менять на звездочки, но именно это он и попросил. Только обработчик события клавиши это не то, не надежно, ввести туда можно и без клавиатуры, менять надо именно в OnChange/



Страницы: 1 вся ветка

Текущий архив: 2005.03.13;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.023 c
1-1109516816
Igor_thief
2005-02-27 18:06
2005.03.13
Выделение ячейки в ValueListEditor


4-1106980489
Ismail
2005-01-29 09:34
2005.03.13
Господа программеры помогите!!!!!!!!!!!


1-1109759071
Pietro
2005-03-02 13:24
2005.03.13
копирование файлов в буфер обмена


3-1106895363
Бульбаш
2005-01-28 09:56
2005.03.13
Сохранение текущего значения при работе с кэшем


1-1109338253
serega_man
2005-02-25 16:30
2005.03.13
Как программировать параметры exe файлов