Frage zum Code von Luckies FileCrypter

[Matze]

Hallo!

Ich habe eine Frage zum Code von Luckies FileCrypter.

Ich wollte mich mal näher mit dem Dec von Hagen Reddmann (negaH) beschäftigen, da dachte ich, ich schaue mir Luckies Code an, da dieser immer ordentlich formatiert, kommentiert und sauber programmiert ist. Ich verstehe ihn soweit auch ganz gut, nur habe ich folgendes Problem:

Verschlüsseln kann man die Dateien ohne Probleme in einer Schleife, wenn man mehrere auf einmal verschlüsseln möchte, nur beim Entschlüsseln habe ich Probleme, da der Thread einige zeit zum Entschlüsseln benötigt und währenddessen schon die nächste Datei entschlüsselt wird, was natürlich nicht funktionieren kann.

Ich müsste also Abfargen, ob der Thread seine Funktion schon erfüllt hat und nun für die nächste Datei bereit ist.

So geht es nicht, da der Thread hier noch arbeitet, während das Programm schon bei der nächsten Datei ist:

Delphi-Quellcode:

  for i := 0 to Anz - 1 do
  begin
    if ReadFileHeader(StrList[i], FileHeader) then
    begin
      CipherClass := FileHeader.FCipherClass;
      HashClass := FileHeader.FHashClass;
      HashEncodedFile := FileHeader.FHashString;

      RunDecodeThread(StrList[i], ExtractFilePath(StrList[i]), Edit5.Text,
        HashEncodedFile, HashClass,
        CipherClass, Handle);
    end;

Wie realisiert man das?