anchor.diff:  //} tox_IP_Port;
     PToxIpPort = ^TToxIpPort;
     TToxIpPort = record
  -    ip: TToxIp;    
  +//    ip: TToxIp;
       port: Word;
   
       padding: Word;
  
positive.code: // *  returns -1 on failure.
  // */
  //int tox_set_statusmessage(Tox *tox, uint8_t *status, uint16_t length);
  function tox_set_statusmessage(tox: TTox; status: PByte; length: Word): Integer;
  
  //int tox_set_userstatus(Tox *tox, TOX_USERSTATUS status);
  function tox_set_userstatus(tox: TTox; status: TToxUserStatus): Integer;
  
  ///*  return the length of friendnumber's status message, including null.
  // *  Pass it into malloc
  // */
  //int tox_get_statusmessage_size(Tox *tox, int friendnumber);
  function tox_get_statusmessage_size(tox: TTox; friendnumber: Integer): Integer;
  
  ///* Copy friendnumber's status message into buf, truncating if size is over maxlen.
  // * Get the size you need to allocate from m_get_statusmessage_size.
  // * The self variant will copy our own status message.
  // */
  //int tox_copy_statusmessage(Tox *tox, int friendnumber, uint8_t *buf, uint32_t maxlen);
  function tox_copy_statusmessage(tox: TTox; friendnumber: Integer; buf: PByte; maxlen: Integer): Integer;
  
  //int tox_copy_self_statusmessage(Tox *tox, uint8_t *buf, uint32_t maxlen);
  function tox_copy_self_statusmessage(tox: TTox; buf: PByte; maxlen: Integer): Integer;
  
  ///*  return one of USERSTATUS values.
  // *  Values unknown to your application should be represented as USERSTATUS_NONE.
  
negative.code: // */
  //void tox_callback_statusmessage(Tox *tox, void (*function)(Tox *tox, int, uint8_t *, uint16_t, void *),
  //                                void *userdata);
  procedure tox_callback_statusmessage(tox: TTox; CallBack: TProcStatusMessage; UserData: Pointer); cdecl; external TOX_LIBRARY;
  
  ///* Set the callback for status type changes.
  // *  function(int friendnumber, USERSTATUS kind)
  // */
  //void tox_callback_userstatus(Tox *tox, void (*function)(Tox *tox, int, TOX_USERSTATUS, void *), void *userdata);
  procedure tox_callback_userstatus(tox: TTox; CallBack: TProcUserStatus; UserData: Pointer); cdecl; external TOX_LIBRARY;
  
  ///* Set the callback for read receipts.
  // *  function(int friendnumber, uint32_t receipt)
  