Auf Elemente der übergeordneten Klasse zugreifen

[silver-moon-2000]

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