Einzelnen Beitrag anzeigen

Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.837 Beiträge
 
Delphi 10 Seattle Enterprise
 
#41

Re: VerschlüsselungsProgramm

  Alt 22. Jul 2004, 08:37
Zitat von dizzy:
[ot]...Postet aber jemand mal ein scherzhaft gemeintes Programm, so hagelt es ernsthafte Verbesserungsvorschläge noch und nöcher --- die Helf-Disziplin hier ist einfach die beste *g*. Sehr löblich an sich, nur geht so einem scherzhaften Proggie da gewaltig der Witz verloren... was irgendwie ja auch schon wieder spassig ist.
Informatiker haben halt sehr viel Humor, aber der erstreckt sich wohl oft nicht bis in ihr Fachgebiet
[/ot]
Hi dizzy,

Ich bin devnull dankbar, dass er diesen Scherz gepostet hat.
Ich selbst habe das Programm nicht downgeloadet und auch nicht getestet, aber eine Umkehrung a lafor i := length(s) downto 1 do Result := Result + s[i]; ist ja deutlich als Scherz zu erkennen. Wobei ich eine ROT13 Verschlüsselung auch als Scherz verstanden hätte

Ich bin aber Hagen noch dankbarer, da ich in diesem Threat sehr viel über Verschlüsselung gelernt habe. (Ich habe mich nie ernsthaft mit Verschlüsselung beschäftigt).

In Ini-Dateien habe ich oft mit ROT13 verschlüsselt, da ich das im Kopf wieder entschlüsseln kann.
(Wir haben früher unsere Spicker und Briefchen in ROT13 verschlüsselt und konnten das fast in Echtzeit laut Lesen.)

Für kleinere Projekte habe ich "meine" Methode verwendet. (Leicht zu verstehen, leicht anzuwenden, trotzdem für den Laien (normalen Benutzer) nicht zu entschlüsseln)

In wichtigen Projekten habe ich auf externe Komponenten zurückgegriffen die dann z.B. 3DES mit großem Schlüssel und Umschlüsselung des Ergebnisses in Silben (RFC 1760).
Die Komponente heißt DEC. Das steht für Delphi Encryption Compendium und ist Freeware.
Die DEC ist einfach super. Das war das beste was ich seinerzeit gefunden habe.
Leider ist die Komponente so mächtig, das man von den Einstellungen erschlagen wird.
Ich habe mir einfach 2 Funktionen geschrieben (encodeStr(str, pwd:string):string, bzw decode(str, pwd:string):string) die für mich 3DES mit Silben erledigt.

Ich gebe aber ehrlich zu das ich nicht verstehe, das da genau (in der Komponente) gemacht wird.
Deshalb bin ich Hagen sehr dankbar, für seine Erklärungen.


@Hagen: Kennst Du DEC? Kannst Du die empfehlen?
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
  Mit Zitat antworten Zitat