Импорт функции из библиотеки на Delphi

[DllImport("XML.dll", SetLastError = true, CallingConvention = CallingConvention.StdCall,
    CharSet = CharSet.Auto)]
        private static extern bool CallXMLRPC2(
            string  ip, //адрес подключения
            string connectid, //айди подключения
            string zap, //строка запроса
            int length_zap,  //длинна запроса
            int zapnum, //номер запроса передавать пусто или 0
            string resfile, // путь с файлом куда писать результат
            StringBuilder buf,
            int sizebuf
            );

 private void button1_Click(object sender, EventArgs e)
        {
            var ip =  "127.0.0.1:2455";
            var zap =@"  <?xml version=""1.0"" encoding=""utf-8"" ?> 
<Query>
  <CMD CMD=""GetData"" Name=""Items"" WithMacroProp=""1"" /> 
 </Query>";
          var lenzap = zap.Length;
           var res ="11.xml";
           var  zapnm = 0 ;
           var bu = new StringBuilder(1024); 
           var result=   CallXMLRPC2(ip,
           "",
          zap,
          lenzap,
                zapnm,
                    res,
                    bu,
                     bu.Capacity);
            
           
       if (result != true)
       {textBox1.Text = ip+"\r\n  "+zap1+"\r\n "+lenzap+"\r\n "+zapnm+"\r\n "+res+"\r\n "+bu.ToString()+"\r\n "+result.ToString();}
               }

[DllImport("XML.dll", SetLastError = true, CallingConvention = CallingConvention.StdCall,
    CharSet = CharSet.Auto)]
        private static extern bool CallXMLRPC2(
[MarshalAs(UnmanagedType.LPStr)]
            string  ip, //адрес подключения
[MarshalAs(UnmanagedType.LPStr)]
            string connectid, //айди подключения
[MarshalAs(UnmanagedType.LPStr)]
            string zap, //строка запроса
            int length_zap,  //длинна запроса
            int zapnum, //номер запроса передавать пусто или 0
[MarshalAs(UnmanagedType.LPStr)]
            string resfile, // путь с файлом куда писать результат
            StringBuilder buf,
            int sizebuf
            );

[DllImport("XML.dll", CharSet = CharSet.Ansi)]
[return: MarshalAs(UnmanagedType.Bool)]
static extern bool CallXMLRPC2(
    string AddressName,
    string ConnectName,
    string Request,
    int RequestSize,
    ref uint RequestNum,
    string ResultFile,
    StringBuilder ErrorBuf,
    int ErrorBufSize
    );

  protected class XmlStream : IStream
        {
 
            private Stream _stream;
            internal XmlStream(Stream stream)
            {
                if (stream == null)
                {
                    throw new ArgumentNullException("ioStream");
                }
                this._stream = stream;
            }
            [SecurityCritical]
            void IStream.Read(byte[] buffer, int bufferSize, IntPtr bytesReadPtr)
            {
                int val = this._stream.Read(buffer, 0, bufferSize);
                if (bytesReadPtr != IntPtr.Zero)
                {
                    Marshal.WriteInt32(bytesReadPtr, val);
                }
            }
            [SecurityCritical]
            void IStream.Seek(long offset, int origin, IntPtr newPositionPtr)
            {
                SeekOrigin origin2;
                switch (origin)
                {
                    case 0:
                        origin2 = SeekOrigin.Begin;
                        break;
                    case 1:
                        origin2 = SeekOrigin.Current;
                        break;
                    case 2:
                        origin2 = SeekOrigin.End;
                        break;
                    default:
                        throw new ArgumentOutOfRangeException("origin");
                }
                long val = this._stream.Seek(offset, origin2);
                if (newPositionPtr != IntPtr.Zero)
                {
                    Marshal.WriteInt64(newPositionPtr, val);
                }
            }
            void IStream.SetSize(long libNewSize)
            {
                this._stream.SetLength(libNewSize);
            }
            void IStream.Stat(out System.Runtime.InteropServices.ComTypes.STATSTG streamStats, int grfStatFlag)
            {
                streamStats = default(System.Runtime.InteropServices.ComTypes.STATSTG);
                streamStats.type = 2;
                streamStats.cbSize = this._stream.Length;
                streamStats.grfMode = 0;
                if (this._stream.CanRead && this._stream.CanWrite)
                {
                    streamStats.grfMode |= 2;
                }
                else
                {
                    if (this._stream.CanRead)
                    {
                        streamStats.grfMode |= 0;
                    }
                    else
                    {
                        if (!this._stream.CanWrite)
                        {
                            throw new IOException("");
                        }
                        streamStats.grfMode |= 1;
                    }
                }
            }
            [SecurityCritical]
            void IStream.Write(byte[] buffer, int bufferSize, IntPtr bytesWrittenPtr)
            {
                this._stream.Write(buffer, 0, bufferSize);
                if (bytesWrittenPtr != IntPtr.Zero)
                {
                    Marshal.WriteInt32(bytesWrittenPtr, bufferSize);
                }
            }
            void IStream.Clone(out IStream streamCopy)
            {
                streamCopy = null;
                throw new NotSupportedException();
            }
            void IStream.CopyTo(IStream targetStream, long bufferSize, IntPtr buffer, IntPtr bytesWrittenPtr)
            {
                throw new NotSupportedException();
            }
            void IStream.Commit(int flags)
            {
            }
            void IStream.LockRegion(long offset, long byteCount, int lockType)
            {
                throw new NotSupportedException();
            }
            void IStream.Revert()
            {
                throw new NotSupportedException();
            }
            void IStream.UnlockRegion(long offset, long byteCount, int lockType)
            {
                throw new NotSupportedException();
            }
        }