Einzelnen Beitrag anzeigen

Benutzerbild von Sko
Sko

Registriert seit: 11. Sep 2005
327 Beiträge
 
Turbo Delphi für Win32
 

Re: VerschlüsselungsProgramm

  Alt 11. Sep 2005, 10:00
Hallo,

ich hab auch ein kleines Verschlüsselungsprogramm erstellt, und hab da mal zwei Fragen (aber bitte nich hauen, bin totaler Anfänger ):

also wie gesagt ich hab ein kleines Verschlüsselungsprogramm geschrieben, in dem man eine Quellatei und eine Zieldatei auswählt und dann ein Passwort eingibt, welches der Schlüssel der Verschlüsselung ist. Das ganze hab ich mit dem DEC gebaut. Zur Zeit sieht das so aus:

Delphi-Quellcode:
    with TCipher_Blowfish.Create(Edit3.text, nil) do
    try
      EncodeFile(Filename, crypt);
    finally
      Free;
    end;
1. Frage: Kann ich wenn ich einen Ciphermanager auf dem Formular habe auch folgendes schreiben:

Delphi-Quellcode:
CipherManager1.InitKey(Edit3.text,nil);
CipherManager1.EncodeFile(Filename,crypt);
Ciphermanager1.Free;
2. Frage: Ich würde gerne eine ComboBox einbauen, in der ich den Verschlüsselungsalgorithmus ändern kann, wie kann ich das machen? Ich hatte es so probiert:

Delphi-Quellcode:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  Ciphermanager1.algorithm:=Combobox1.text;
end;
das hat aber nicht geklappt.

Vielen Dank schon mal im Vorraus für eure Hilfe
  Mit Zitat antworten Zitat