"Assido" <As****@discussions.microsoft.comschrieb:
here is the API-Function:
Declare Function WrapCompressedRTFStream Lib "mapi32.dll" (ByRef
lpCompressedRTFStream As Long, ByVal ulFlags As Long, ByRef
lpUncompressedRTFStream As Long) As Long
You may want to wrap the stream into a
'System.Runtime.InteropServices.ComTypes.IStream' and declare the parameter
as 'ByVal ... As IStream'. However, note that your declaration is not valid
for VB.NET.
Untested:
\\\
Imports System.Runtime.InteropServices
Imports System.Runtime.InteropServices.ComTypes
....
Public Declare Function WrapCompressedRTFStream Lib "mapi32.dll" ( _
ByVal lpCompressedRTFStream As IStream, _
ByVal ulflags As UInt32, _
<Out()ByVal lpUncompressedRTFStream As IStream _
) As IntPtr
///
Maybe you have to specify additional marshalling attributes.
--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>