Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: DCPCrypt Datei zeilenweise verschlüsseln.

    Delphi
    by himitsu, 19. Jun 2014
  Da brauchst'e eigentlich keine Sorgen haben.
  Eine "Kopie" des Strings geht ja in die Funktion und danach wird dann das Ergebnis in die Stringliste geschrieben.
  Und da du den alten Zeileninhalt danach nicht mehr braucht, kann man ihn also problemlos gleich ersetzen.
  
  Das Liste := TStringlist.Create; kannst du zwar auch erst in dem Try-Finally machen, aber dann mußt du vor dem Try zumindestens...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: DCPCrypt Datei zeilenweise verschlüsseln.

    Delphi
    by himitsu, 19. Jun 2014
  Gekürzt ergibt dein ButtonDCPEncryptClick also folgenden Verschlüsselungscode?
  Cipher := TDCP_rijndael.Create(Self);
  try
  Cipher.InitStr(EditPasswort.Text, TDCP_sha1);
  Cipher.EncryptString('1. Zeile'); // fällt dir was auf?
  Cipher.EncryptString('2. Zeile');
  Cipher.EncryptString('3. Zeile');
  Edit2.Text := Cipher.EncryptString(Edit1.Text);
  Cipher.Burn;
  finally