Thema: Delphi Verschlüsselungstool

Einzelnen Beitrag anzeigen

pronoob1

Registriert seit: 10. Sep 2009
4 Beiträge
 
Delphi 2007 Professional
 
#17

Re: Verschlüsselungstool

  Alt 9. Nov 2009, 14: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
  Mit Zitat antworten Zitat