readln...

[toms]

Hi,

Habe etwas gegoogelt und bin auf eine Unit PassText gestoßen.

Delphi-Quellcode:

program PasswordTest;

{$APPTYPE CONSOLE}

uses
  PassText; // siehe Anhang

var
  Password : string;
begin
  ConsoleGetPassword('Passwort eingeben: ', Password);   Writeln;
  Write('Eingegebenes Passwort: ', Password);
  Readln;
end.