NetSend mit empfangs bestätigung ?

[Xipe]

Hi !

mit folgendem code sende ich netsend nachrichten:

Code:

function NetMsgSend(const ServerName, MsgName, FromName, Msg: WideString): Integer;

function WC(const Name: WideString): PWideChar;
  begin
    if Name = '' then Result := nil
      else Result := PWideChar(Name);
  end;

var
  NetLib: THandle;
  NetMessageBufferSend: function(ServerName, MsgName, FromName: PWideChar;
                           Buffer: PWideChar; BufferLen: DWord): Integer; stdcall;
begin
  Result := -1;
  NetLib := LoadLibrary('NETAPI32.DLL');
  if NetLib <> 0 then
  try
    @NetMessageBufferSend := GetProcAddress(NetLib, 'NetMessageBufferSend');
    if Assigned(NetMessageBufferSend) then
      Result := NetMessageBufferSend(WC(ServerName), WC(MsgName), WC(FromName),
                  Pointer(Msg), Length(Msg) * 2);
  finally
    FreeLibrary(NetLib);
  end;
end;

ist es mit diesem code irgendwie möglich ne meldung zu erhalten, ob der empfänger die Nachricht erhalten hat, bzw ob er online is oder so?

danke vielmals fürs reinschauen !