wiedermal funzt synchronize im TThread nicht

[Klaus01]

Delphi-Quellcode:

Type 
TControlCardControlThread = class(TThread)
  private
   procedure updateForm3;
  ...
  protected
    procedure Execute; override; // ist override
   ...
end;


procedure TControlCardControlThread.updateForm3;
begin
  Form3.sync;
end;

procedure TControlCardControlThread.Execute;
var c, iIndex: integer;
    //TempTisch: TTischInfo;
    //Punkte, Geschwindigkeiten, Beschleunigungen: array[1..3] of double = [0,0,0];
   
begin
  repeat
  c := GetTickCount;
  Synchronize(updateForm3);
  c := {interval}50 - (GetTickCount - c);
  if c > 0 then Sleep(c);
  until Terminated;

Ist es nicht so, dass eine Methode des Thread "synchronisiert" werden sollte.
Vielleicht klappt esja mit den Änderungen oben.

Grüße
Klaus