Zitat von
Apollonius:
Der Thread braucht ein Feld, in dem die CRCList gespeichert wird.
Erstmal danke für die Antwort.
Wenn ich Dich recht verstehe, meinst Du etwa folgendes?
Delphi-Quellcode:
type TCRCThread = class(TObject)
private
fList : TCRCList; // <--
protected
[...]
end;
procedure TCRCThread.Create;
begin
fList := TCRCList.Create;
end;
procedure TCRCList.StartCRC;
begin
fThread := TCRCThread.Create;
fThread.fList.fOL := fOL;
fThread.fList.fInList := fInList;
fThread.fList.fOutList := fOutList;
fThread.Resume;
end;
So hatte ich es auch mal, aber es erschien mir zu "umständlich", um richtig zu sein
Allerdings tut sich ein kleine Problem auf:
[Pascal Error] uType.pas(112): E2003 Undeclared identifier: 'TCRCList'
Delphi-Quellcode:
type TCRCThread = class(TObject)
private
fList : TCRCList; // <--
protected
[...]
end;
type TCRCList = class(TObject)
private
fThread : TCRCThread; // <--
protected
[...]
end;
Wenn Du Deine Augenbrauen zusammenziehst, bitte ich um besondere Beachtung meiner Signatur, hehe