Blowfish File decoden ECB mit DEC aber wie?

[R0BIN]

Hallo,


ich möchte eine Datei mittels Blowfish ECB decoden...
Dafür würde ich gerne DEC benutzen, doch ich bekomme es nichtmal hin es zu starten.

Hier mal mein bisheriger Code:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,DECUtil, DECCipher, DECHash, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var 
  CipherClass: TCipherClass; 
begin 
  TCipher_Blowfish.Register; 
  TCipher_Rijndael.Register;  
  THash_MD5.Register; 
  THash_SHA1.Register; 

  CipherClass := DECClassByname('Blowfish', TDECCipher); 
  with CipherClass.Create('Passwort hier', nil) do 
  try 
    EncodeFile(); 
  finally 
    Free; 
  end;
end;

end.

Und es kommt folgende Meldung:

Code:

[Pascal Fehler] Unit1.pas(28): E2003 Undefinierter Bezeichner: 'TCipherClass'
[Pascal Fehler] Unit1.pas(36): E2029 'DO' erwartet, aber Bezeichner 'Create' gefunden
[Pascal Fehler] Unit1.pas(38): E2003 Undefinierter Bezeichner: 'EncodeFile'
[Pascal Fataler Fehler] Project1.dpr(5): F2063 Verwendete Unit 'Unit1.pas' kann nicht compiliert werden

Ich hoffe mir kann jemand helfen.

R0BIN