Wie kann ich en Edit Feld schützen

[Wishmaster]

Komponente Installiert, Die TEdit eingebunden und sonst das selbe wie auch du.

Wen ich text vom Clipboard einfüge funzt alles wie es soll, dann geht’s auch mit Grossen Buchstaben!

Die compo wurde ursprünglich mit Delphi 5 geschrieben, ich benutze seit kurzem BDS2006! Dar wahren einige feiler die ich schon beseitigt habe wie

EndSel := (VResult and $FFFF0000) shr 8; < ursprünglich shr 16 Mit shr 16 hat er mir alles doppelt angezeigt.

Beispielsweise wen im edit 123 steht hat er mir 112233 angezeigt. Jetzt macht er das nur wen die Länge der der Zeichen = 1 ist

Beispiel 1

Edit.text:= t
SecretText:= tt

Beispiel 2
Edit.text:= test
SecretText:= test