Начал создавать игру взломщик паролей сталкнулся с такой проблемой. В графе Name вводим имя (здесь вопросов нет); а в графе Password мне нужно чтобы все цифры были видны как *. Помогите кто может.

uses crt;
var
  ch: char;
begin
  repeat
    ch := readkey;
    write('*');
  until ch = #13;
end. 

Спасиб.


З.Ы. ну блин я и тормаз )