Gracias ecfisa por contestar,
he realizado pruebas con tu código, y no va parece que falta agregarle algo para que quede bien.
creo que aquí no toma el edit indicado
Código Delphi
[-]procedure TForm1.miShowHidePwdClick(Sender: TObject);
const
PWDCHAR: array[Boolean] of Char = (#0, '*');
var
E: TEdit;
begin
E:= FindComponent(PopupMenu1.PopupComponent.Name) as TEdit;
if Assigned(E) then
E.PasswordChar:= PWDCHAR[E.PasswordChar = #0]
end;
creo que en esta parte esta faltando algo, se indicaría el TEdit que queremos que haga la acción.
Código Delphi
[-] E:= FindComponent(PopupMenu1.PopupComponent.Name) as TEdit;
aver si me ayudas