diff --git a/rtl/beos/tthread.inc b/rtl/beos/tthread.inc
index d722f24506..8ece62f64f 100644
--- a/rtl/beos/tthread.inc
+++ b/rtl/beos/tthread.inc
@@ -244,11 +244,6 @@ end;
 
 procedure TThread.Synchronize(Method: TThreadMethod);
 begin
-  FSynchronizeException := nil;
-  FMethod := Method;
-{  SendMessage(ThreadWindow, CM_EXECPROC, 0, Longint(Self)); }
-  if Assigned(FSynchronizeException) then
-    raise FSynchronizeException;
 end;
 
 
diff --git a/rtl/objpas/classes/classesh.inc b/rtl/objpas/classes/classesh.inc
index 232127e050..84ba0b1977 100644
--- a/rtl/objpas/classes/classesh.inc
+++ b/rtl/objpas/classes/classesh.inc
@@ -1397,8 +1397,6 @@ type
     FSuspended: LongBool;
     FReturnValue: Integer;
     FOnTerminate: TNotifyEvent;
-    FMethod: TThreadMethod;
-    FSynchronizeException: TObject;
     FFatalException: TObject;
     procedure CallOnTerminate;
     function GetPriority: TThreadPriority;