Delphi -newbie!

[fLaSh11]

Das ist völliger Quatsch... (schon einmal einen Blick in den OI geworfen? )

Zitat von oldmax:

Delphi-Quellcode:

Procedure Form1.Edit1KeyPress(Sender : Tobject; var Key: Char);
Begin
  Geheim:=Geheim+Key;  // hier beschreibst du dein unsichtbares geheimes Wort.
  Key:='*';  // Das Sternchen überschreibt den Text im Editfeld, also ist deine Eingabe unsichtbar
end;

Wie wär's mit:
Edit1.PasswordChar:='*';

Zitat von oldmax:

Delphi-Quellcode:

Procedure Form1.Edit2KeyPress(Sender : Tobject; var Key: Char);
Begin
  if Length(Edit2.Text)>1 then Key:='';  // begrenzt die Eingabe auf 1 Zeichen.
  
end;

Warum einfach, wenns auch umständlich geht?
Edit1.MaxLength:=1