anchor.diff:  procedure TSyncExecuteCritSec.Clear;
   begin
     CmdCallMethod      := nil;
  +  CmdRdyMethod       := nil;
  +  CmdProgressMethod  := nil;
  +  CmdStatusMethod    := nil;
     DownloadMethod     := nil;
     FinishedMethod     := nil;
     SyncToMainFunction := nil;
     SyncToMainMethod   := nil;
     Command            := nil;
     CmdMsg             := nil;
  +  Core               := nil;
  +  Profile            := nil;
     stb                := nil;
     p1                 := nil;
     o1                 := nil;
  
positive.code: TSyncExecuteCritSec = class(TCriticalSection)
  public
    CmdCallMethod      : TTMLOnCmdCall;
    DownloadMethod     : TTMLStreamDownloadCallback;
    FinishedMethod     : TTMLStreamFinishedCallback;
    SyncToMainFunction : TTMLOnSyncToMainThread_Function;
    SyncToMainMethod   : TTMLOnSyncToMainThread_Method;
    Command            : TTMLCommand;
    CmdMsg             : TTMLCmdMsg;
    stb                : TTMLStreamTypeBase;
    StreamID           : TML_STREAM_ID;
    p1                 : TML_POINTER;
  
negative.code:   property LastError    : TML_INT32      read FLastError;
    property LastMessage  : string         read FLastMessage;
    property Data         : TSIDEXDocument read GetData;
    property SyncReply    : Boolean        read FSyncReply      write FSyncReply;
  
    constructor Create; overload;
    constructor Create(cmdid : TML_COMMAND_ID); overload;
  