Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 17. Jun 2010
  :duck: Ganz dummer Fehler:
  Type
  TSignJob = Packed Record
  FileName : String;
  Password : String;
  CryptFile : String;
  End;
  
  Ist an sich selbsterklärend. Wenn man aber im Träumen dem Decrypter statt dem .CryptFile die unverschlüsselte Datei (.FileName) übergibt, braucht man sich über Fehler nicht zu wundern.
  Jetzt klappt es!
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 17. Jun 2010
  Und es wird noch merkwürdiger:
  
  Ich lasse mir nun das Passwort, die Datei etc. anzeigen (ShowMessage()), die alle übereinstimmen. Auch habe ich mit separatem Code das Verschlüsseln und Entschlüsseln mit separaten Programmen* trainiert :lol:. Das klappt und noch besser wird es, wenn der Server verschlüsselt und ich mit meinem separaten Entschlüsselungs-Programm (Siehe *) die Datei erfolgreich...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 15. Jun 2010
  Ja. Das habe ich zu Testzwecken gleich als erstes gemacht: S:=CreateKey;
  S2:=NameCryptFile(EdPollDir.Text, 'enc');
  Try
  EncryptFile(Strings + '_sign.png',// zugehörige Unterschrift
  S2, S);
  DecryptFile(S2, 'C:\Test_Server.png', S);
  ...
  Except
  // Fehlerbehandlung, falls Verschlüsseln nicht klappt
  End;Ich habe dann im Stamm von C: die Datei, die...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 15. Jun 2010
  Da ich den Code in einer eigenen Unit untergerbacht habe, die wegen 4 Funktionen nicht objektorientiert ist, habe ich kein OnCreate(). Aber ich habe es in der Initialization probiert, was m.E. dasselbe bewirken sollte. Aber es klappt trotzdem nicht.Das ist mir klar. Aus diesem Grunde wird die Unit sowohl beim Server als auch beim Client eingebunden und verwendet.
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 15. Jun 2010
  Danke für die schnelle Antwort!
  
  
  Ich dachte schon. In einem anderen Beispielcode hatte ich das mal so gesehen. Dort wurde es über globale Variablen gemacht, denen gleich Standardwerte mitgegeben wurden:Var
  AKDFIndex : LongWord = 1;
  ACipherMode : TCipherMode = cmCBCx;
  AHashClass : TDECHashClass = THash_Whirlpool;
  ACipherClass : TDECCipherClass =...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  Dateiverschlüsselung mit DEC (5.2)

    Delphi
    by Schwedenbitter, 15. Jun 2010
  Hallo,
  
  in einer Client-Server-Umgebung möchte ich, dass der Server dem Client eine Datei zur Verfügung stellt. Diese soll verschlüsselt werden. Dem Client werden dann nur der Name/Pfad der verschlüsselten Datei auf einem Fileserver und das Passwort übermittelt. Nun möchte ich aus Sicherheitsgründen auf dem Client die Datei nicht zwischenspeichern, sondern als TMemoryStream weiter verarbeiten....