Hey,
kann mir jmd.folgende function erklären?



Ich weiß das ich diese Funktion zum verschlüsseln und gleichzeitig zum entschlüsseln verwenden kann...aber was passiert da genau?
und was mache ich als angabe bei Key?

Viele liebe Grüße und Frohe weihnachten..

Stichwort XOR-Verschlüsselung. Und guck dir mal an, was der boolesche Operator XOR macht bzw. wie eine XOR-Operation auf Bitebene aussieht. Und es ist durchaus hilfreich, wenn man sich das mal mit Papier und Bleistift klar macht.

Hallo,

Diese Funktion arbeitet nur mit nicht Unicode texten Valide.
Es wird angenommen dass jedes Zeichen als Byte (8 Bit) kodiert ist.
Der erste Parameter ist der zu verschlüsselnde oder zu entschlüsselnde Text. Im zweiten Parameter wird ein Schlüssel übergeben, hier ein Byte (z.B. eine Zahl von 0 bis 255, möglicherweise der Zeichencode eines Zeichens, z.B. ord('A'))
Zuerst wird dem Rückgabestring der Eingabewert zugewiesen.
Als zweites erfolgt eine Iteration über die Zeichenkette
Für jedes Zeichen wird eine XOR (de.wikipedia.org/wiki/XOR) Verknüpfung durchgeführt.
Sind Original und Schlüssel verschieden, so ist das Resultat eine 1, sonst Null.

Bei Beispiel:
Original: 10011100
Key: 11001010
XOR_1: 01010110

Und die Entschlüsselung:
XOR_1: 01010110
Key: 11001010
XOR_2: 10011100

Wie Du siehst ist XOR_2 gleich dem Original.

Diese einfache Funktion funktioniert nur wenn jedes Zeichen genauso lang (binär betrachtet) ist wie der Schlüssel.

Die Funktion kannst Du so verwenden:


nettes Weihnachten,
Tilo

(Luckie war schneller)

Tilo hat folgendes geschrieben :

Diese Funktion arbeitet nur mit nicht Unicode texten Valide.

Wenn du damit meinst, dass die Verschlüsselung bei Unicodetexten so nicht gut ist, hast du Recht. Wenn du damit meinst, dass die Ver- und Entschlüsselung nicht korrekt funktioniert, hast du nicht Recht.

Für Unicode sollte der Schlüssel vom Typ Word statt Byte sein (und dementsprechend groß), da sonst jeweils nur eines der beiden Bytes der Unicodezeichen verändert wird. Funktionieren tut es aber auch mit Byte.

Wenn ich Memo1.Text:=encodestr(Memo1.Text, ord('C')) verwende, funktioniert es mal und mal nicht..je nach text?
vorhher hatte ich statt ord('C'), 20 verwendet,da ich nicht wusste was da hin muss..war das falsch? ..aufjedenfall hats da besser funktioniert...
LG

Was meinst du mit funktionieren? Dass beim Verschlüsseln wieder Buchstaben herauskommen? Das ist nicht der Sinn einer xor-Verschlüsselung.

Wenn du das willst, musst du eine andere Verschlüsselung benutzen.

Hallo

Ob Du nun Ord('C') oder 20 als Schlüssel angibst ist egal. Es muss nur eine Zahl zwischen 0 und 255 sein. Ord('C') gibt den ASCII Code von C zurück. Dies ist eine Zahl.
Dass die Funktion nicht immer funktioniert ist klar, da sie die Zeichen binär mit den Schlüssel verarbeitet. Dadurch kann halt aus einem normalen Zeichen ein nicht darstellbares Symbol werden, also alle ASCII Codes unter 31. Dies müsstes Du bei der Darstellung abfangen und diese Symbole durch darstellbare Zeichen ersetzen.
Achtung, Für eine erfolgreiche Entschlüsselung muss Du dir den Text im Hintergrund merken (extra Variable).

mit nicht funktionieren meinte ich, das der text beim entschlüsseln nicht der selbe ist...was soll ich denn anstatt dieser, für eine verschlüsselung verwenden? es soll ja möglichst einfach sein und nur zu demonstration..

Die Cäsar-Verschlüsselung ist z.B. sehr einfach. Dabei ersetzt du jeden Buchstaben einfach durch den im Alphabet folgenden und das Z durch das A. Auf diese Weise kommen auch wieder nur Buchstaben heraus. Dafür funktioniert es auch nur mit lateinischen Buchstaben.

Hast du dafür vllt einen Code? LG

Ist es denn so schwer danach einfach mal mit Google oder hier im Forum zu suchen?

Hab ja deswegen gefragt :b ....lg

Was brauchst du denn noch? Du hast doch alle benötigten Suchbegriffe.