Die Passwort Abfrage gibt es schon fix & fertig.
Der Dialog erlaubt nicht nur das Abfragen eines Passworts,
sondern enthält auch einen Passwort-Ändern-Dialog.
Hier die relevanten Properties:
Delphi-Quellcode:
// PwChange = True: Change PW Dialog
// PwChange = False: Input PW Dialog
property PwChange:Boolean read FPwChange write FPwChange;
property Caption : string read FCaption write FCaption;
property OldPassword : string read FOldPassword write FOldPassword;
property MinLen : integer read FMinLen write FMinLen;
property NewPassword : string read FNewPassword;