Delphi-PRAXiS - Delphi xor, was ist falsch?

Zitat:

Zitat von Angel4585

also wenn die länge 4 beträgt, sieht die reihenfolge der indexe wenn ich i nicht eins veringere(meine version) doch so aus: 1,2,3,0,1,2,3,0,1,2,3,...

Richtig, aber nicht genau das was du eigentlich willst.

Zitat:

Zitat von Angel4585

wenn ich i verringere(deine version) so: 0,1,2,3,0,1,2,3,...

Falsch.

Code:

			const key = '4585';

index = Succ(Pred(i) mod Length(key))

i    index

----------

1        1

2        2

3        3

4        4

5        1

...

Zitat:

Zitat von Angel4585

Das sollte doch trotzdem funktionieren, da ich beim VERschlüsseln und beim ENTschlüsseln immer das selbe verwende.

Okay, wenn du so leben kannst.

Grüße