Código Delphi [-]password:=InputBox('Identificación', 'Ingrese Password','');
password:=InputBox('Identificación', 'Ingrese Password','');