Zitat von
scrat1979:
Delphi-Quellcode:
[...]
VAR
HexPasswort : String;
i : Integer;
Begin
HexPasswort := '';
for i := 1 to Length(passwort) Do
HexPasswort := HexPaswort + IntToHex(ORD(Edit1.Text[i]),2);
ShowMessage(HexPasswort);
[...]
... soll nur eine Anregung sein.
SCRaT
Hallo scrat1979
kannst Du mir Code komplett schreiben?
Oder muss ich irgendwas in Bereich
uses ...
schreiben?
so soll etwa Login-Fenster aussehen:
Das Bild von dem LogIn
Gruß