Entwickler-Ecke

Sonstiges (Delphi) - Programm --> zeichen in ASCII dezimal code umwandeln


the-kecks - Mo 04.05.09 16:18
Titel: Programm --> zeichen in ASCII dezimal code umwandeln
hi,
ich mache ein Programm, das account daten vor trojanern etc. schützen soll. das funzt so:
der benutzer tippt seine account daten ins programm ein, klickt auf "verschlüsseln" und das programm wandeln die buchstaben in den dezimalen ASCII code des buchstaben um und speichert das in ner txt. danach kann man sich die datei im programm die entschlüsseln lassen. das geht ja relativ einfach mit char().
nun brauche ich aber einen befehl mit dem ich buchstaben in die dezimal werte umwandeln lassen kann.

mfg


Gausi - Mo 04.05.09 16:22

Ich glaube, du brauchst eine Kombination aus StrToInt() und IntToStr() sowie Char() und Ord().


the-kecks - Mo 04.05.09 16:33

danke!
falls jmd das gleiche problem hat:

Delphi-Quelltext
1:
showmessage('A = '+IntToStr(Ord('A')));                    


mfg


Delete - Mo 04.05.09 16:41

Oder

Delphi-Quelltext
1:
showmessage(Format('A = %d',[Ord('A')]));