Einzelnen Beitrag anzeigen

Svenkan

Registriert seit: 10. Feb 2007
Ort: Bersenbrück
547 Beiträge
 
Delphi 7 Enterprise
 
#1

Valuelisteditor - Speichern und Wert verschlüsseln

  Alt 19. Aug 2007, 23:39
Hey Leute,
und zwar möchte ich eine .htaccess-Datei erstellen.
Ich habe einen TValueListEditor, in dem ich Benutzername und Passwort stehen habe (noch unverschlüsselt).
Das Speichern der Daten in eine einfache Textdatei funktioniert auch ohne Probleme.
Nun möchte ich aber, dass das Passwort beim Speichern verschlüsselt wird. Nur leider habe ich da null Ahnung von..

Delphi-Quellcode:
 pfad:=ExtractFilePath(ParamStr(0))+'.htpasswd';
 AssignFile(datei, pfad);
 Rewrite(datei);
 for i:=1 to VLE.RowCount-1 do begin
  key:=VLE.keys[i];
  Write(datei, key+':');
  with DESCrypt1 do begin
   input:=VLE.Values[key];
   salt:='bY';
   if execute then Write(datei, output);
  end;
  Write(datei, #13#10);
 end;
 CloseFile(datei);
Ich habe folgende Komponente gefunden: http://www.magsys.co.uk/delphi/unixcrypt.asp
Damit ist es möglich, DES-Crypt zu verwenden.
Die Frage ist nun: wie bekomm ich damit den richten Algorythmus hin?
Sven Kannenberg
  Mit Zitat antworten Zitat