Und wenn Du einen Pointer auf den Record an den Thread übergibst und innerhalb des Threads auf diesen zugreifst?

Ich habe gerade nochmal den Informationsfluss von Mainform zu Thread ueberprueft. Der Inhalt des Records im Mainform kommt definitv im Thread an. Kann es sein dass Uebergaben bei Threads nicht per call-by-reference geschehen? Dann wunder ich mich aber, dass bei uebergebenen VCL Komponenten ein synchronize moeglich ist.

Objekte, also auch VCL-Komponenten, werden immer als Referenz übergeben und in Referenzvariablen gespeichert.
Deine interne Record-Variable ist aber keine Referenz, sondern eine Kopie.

zusammenfalten · markieren

Delphi-Quellcode:

type
  PMyVar = ^TMyVar;

  TMyThread = class(TThread)
  private
    FExtVar: PMyVar;
    FMyVar: TMyVar;
    CopyToExtVar;
    DoOnTerminate; override;
  public
    {darf nur im constructor oder vor dem Resume aus dem Hauptthread aufgerufen werden}
    InitMyVar(var MV: TMyVar);
  end;

procedure TMyThread.InitMyVar(var MV: TMyVar);
begin
  {Verweis auf externe Variable}
  FExtVar := @MV;
  {Kopie der externen Variable}
  FMyVar := MV;
end;

procedure TMyThread.DoOnTerminate;
begin
  {wird beim Beenden im Thread aufgerufen}
  if Assigned(FExtVar) then
    Synchronize(CopyToExtVar);
  inherited;
end;

procedure TMyThread.CopyToExtVar;
begin
  {interne Variable in die externe Variable kopieren}
  if Assigned(FExtVar) then
    FExtVar^ := FMyVar;
end;

IIRC wird durch die Zuweisung des Parameters an das private Feld eine Kopie des Records erzeugt, da nützt auch die "var"-Angabe nichts. Übergibt man hingegen den Pointer, arbeitet man tatsächlich mit dem Original. Objektinstanzen sind übrigens intern auch Pointer, daher funktioniert das damit.

Zitat von DeddyH:

Objektinstanzen sind übrigens intern auch Pointer, daher funktioniert das damit.

Richtiger:
Objektvariablen sind Pointer die auf eine Instanz der Klasse (oder einer abegleiteten Klasse) verweisen.
Bei der Zuweisung einer Objektvariablen wird nicht die Instanz kopiert, sondern nur deren Adresse weitergegeben.

hmm genau das scheint der Fall zu sein. Records werden anscheinend nur call-by-value an Threads uebergeben. Siehe folgende Diskussion:

http://stackoverflow.com/questions/9...y-of-an-object

Der letzte Vorschlag in der Liste entspricht der Idee von DeddyH einen Pointer auf das Array zu uebergeben. Ganz wohl ist mir dabei nicht, da ich nicht sicher bin ob das Terminieren des Threads ein moegliches Problem darstellen koennte.

Solange Du nicht auf die Idee kommst, beim Terminieren des Threads ein Dispose auf den Pointer loszulassen, wüsste ich nicht, was für Probleme auftreten sollten.