Edit Показать/Скрыть пароль.. String и Char проблемы..

[Человек_Борща]

Привет=)
Вот какая проблема:
На форме есть
1 Edit
и PopupMenu(ShowUserPass и HideUserPass)

и так...

procedure TMainForm.ShowUserPassClick(Sender: TObject);
begin
Edit.PasswordChar:='#0';
end;

procedure TMainForm.HideUserPassClick(Sender: TObject);
begin
Edit.PasswordChar:='*';
end;

но проблема..
PasswordChar требует тип Char...

Как реализовать преобразование String в Char..
если Edit.PasswordChar:='#0'; имеет 2 символа а при разбитии посимвольно будет только знак #?
как сплюсовать # и 0, если Incopatibli types 'Char' and'shortString'?
как реализовать? Показать\Спрятать пароль?

[Kotofff]

имеет 2 символа а при разбитии посимвольно будет только знак #?

Какие еще 2 символа ?
Во-первых, нужно писать так :

Edit.PasswordChar:= #0;

Edit.PasswordChar:= #0; - это отключение ввода пароля, т.е. нормальное отображение вводимых символов

[Человек_Борща]

о спасибо, работает..

если разбить строку на Char а потом указать:

var
ph:Char;
s:string;
begin
s:='#0';
ph:=s[1];
edit.Text:=s[1];

то будет # вместо #0..

ладно спасибо, недумал что так можно=) Спасибо kotoff

мм если #0 это 0.. то * это какой #?

//----------------Добавлено-------------//
все проблема устранилась=)
Спасибо всем=)

* это #42

вот таблица ASCI кодов: http://ascii.org.ru/ascii.pdf

procedure TMainForm.ShowUserPassClick(Sender: TObject);
begin
Edit.PasswordChar:=#0;
end;

procedure TMainForm.HideUserPassClick(Sender: TObject);
begin
Edit.PasswordChar:=#42;
end;

З.Ы. Поиск как всегда выручает...