TSynchronizeRecord = record
  FThread: TObject;
  FMethod: TThreadMethod;
  FProcedure: TThreadProcedure;
  FSynchronizeException: TObject;
end;

struct TSynchronizeRecord {
  TObject * FThread;
  TThreadMethod FMethod;
  TThreadProcedure FProcedure;
  TObject * FSynchronizeException;
};