Registriert seit: 10. Sep 2009
4 Beiträge
Delphi 2007 Professional
|
Re: Verschlüsselungstool
9. Nov 2009, 15:51
Danke für die schnelle Hilfe,
habs jetz so gemacht wie ihrs gesagt habt, nur noch davor "-2", weil
beim Verschlüsseln, der Buchstabe immer um 3 Stellen verschoben wurde, sieht also jetz so aus:
normedKey := Ord(AKey) - Ord('A') -2 +StrToInt(Form1.Edit1.Text);
lg
Tobi
|