ホーム › Devices.Tapi › OpenTnefStreamEx
OpenTnefStreamEx
関数アドレス帳を指定してTNEFストリームを開く拡張版。
シグネチャ
// MAPI32.dll
#include <windows.h>
HRESULT OpenTnefStreamEx(
void* lpvSupport,
IStream* lpStream,
CHAR* lpszStreamName,
DWORD ulFlags,
IMessage* lpMessage,
WORD wKeyVal,
IAddrBook* lpAdressBook,
ITnef** lppTNEF
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| lpvSupport | void* | inout | MAPIサポートオブジェクトへのポインタ。アドレス解決等に使用する。 |
| lpStream | IStream* | in | TNEFデータを読み書きする入出力ストリーム(IStream)へのポインタ。 |
| lpszStreamName | CHAR* | in | TNEFストリームの名前を示すANSI文字列へのポインタ。 |
| ulFlags | DWORD | in | 動作を制御するフラグ(TNEF_DECODE/TNEF_ENCODE等)。 |
| lpMessage | IMessage* | in | TNEFと変換対象のMAPIメッセージ(IMessage)へのポインタ。 |
| wKeyVal | WORD | in | 添付の関連付けに用いるキー値(任意の一意な値)。 |
| lpAdressBook | IAddrBook* | in | アドレス解決に使用するアドレス帳(IAddrBook)へのポインタ。NULL可。 |
| lppTNEF | ITnef** | out | 作成されたITnefオブジェクトを受け取る出力先ポインタ。 |
戻り値の型: HRESULT
各言語での呼び出し定義
// MAPI32.dll
#include <windows.h>
HRESULT OpenTnefStreamEx(
void* lpvSupport,
IStream* lpStream,
CHAR* lpszStreamName,
DWORD ulFlags,
IMessage* lpMessage,
WORD wKeyVal,
IAddrBook* lpAdressBook,
ITnef** lppTNEF
);[DllImport("MAPI32.dll", ExactSpelling = true)]
static extern int OpenTnefStreamEx(
IntPtr lpvSupport, // void* in/out
IntPtr lpStream, // IStream*
IntPtr lpszStreamName, // CHAR*
uint ulFlags, // DWORD
IntPtr lpMessage, // IMessage*
ushort wKeyVal, // WORD
IntPtr lpAdressBook, // IAddrBook*
IntPtr lppTNEF // ITnef** out
);<DllImport("MAPI32.dll", ExactSpelling:=True)>
Public Shared Function OpenTnefStreamEx(
lpvSupport As IntPtr, ' void* in/out
lpStream As IntPtr, ' IStream*
lpszStreamName As IntPtr, ' CHAR*
ulFlags As UInteger, ' DWORD
lpMessage As IntPtr, ' IMessage*
wKeyVal As UShort, ' WORD
lpAdressBook As IntPtr, ' IAddrBook*
lppTNEF As IntPtr ' ITnef** out
) As Integer
End Function' lpvSupport : void* in/out
' lpStream : IStream*
' lpszStreamName : CHAR*
' ulFlags : DWORD
' lpMessage : IMessage*
' wKeyVal : WORD
' lpAdressBook : IAddrBook*
' lppTNEF : ITnef** out
Declare PtrSafe Function OpenTnefStreamEx Lib "mapi32" ( _
ByVal lpvSupport As LongPtr, _
ByVal lpStream As LongPtr, _
ByVal lpszStreamName As LongPtr, _
ByVal ulFlags As Long, _
ByVal lpMessage As LongPtr, _
ByVal wKeyVal As Integer, _
ByVal lpAdressBook As LongPtr, _
ByVal lppTNEF As LongPtr) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
OpenTnefStreamEx = ctypes.windll.mapi32.OpenTnefStreamEx
OpenTnefStreamEx.restype = ctypes.c_int
OpenTnefStreamEx.argtypes = [
ctypes.POINTER(None), # lpvSupport : void* in/out
ctypes.c_void_p, # lpStream : IStream*
ctypes.POINTER(ctypes.c_byte), # lpszStreamName : CHAR*
wintypes.DWORD, # ulFlags : DWORD
ctypes.c_void_p, # lpMessage : IMessage*
ctypes.c_ushort, # wKeyVal : WORD
ctypes.c_void_p, # lpAdressBook : IAddrBook*
ctypes.c_void_p, # lppTNEF : ITnef** out
]require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('MAPI32.dll')
OpenTnefStreamEx = Fiddle::Function.new(
lib['OpenTnefStreamEx'],
[
Fiddle::TYPE_VOIDP, # lpvSupport : void* in/out
Fiddle::TYPE_VOIDP, # lpStream : IStream*
Fiddle::TYPE_VOIDP, # lpszStreamName : CHAR*
-Fiddle::TYPE_INT, # ulFlags : DWORD
Fiddle::TYPE_VOIDP, # lpMessage : IMessage*
-Fiddle::TYPE_SHORT, # wKeyVal : WORD
Fiddle::TYPE_VOIDP, # lpAdressBook : IAddrBook*
Fiddle::TYPE_VOIDP, # lppTNEF : ITnef** out
],
Fiddle::TYPE_INT)#[link(name = "mapi32")]
extern "system" {
fn OpenTnefStreamEx(
lpvSupport: *mut (), // void* in/out
lpStream: *mut core::ffi::c_void, // IStream*
lpszStreamName: *mut i8, // CHAR*
ulFlags: u32, // DWORD
lpMessage: *mut core::ffi::c_void, // IMessage*
wKeyVal: u16, // WORD
lpAdressBook: *mut core::ffi::c_void, // IAddrBook*
lppTNEF: *mut *mut core::ffi::c_void // ITnef** out
) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("MAPI32.dll")]
public static extern int OpenTnefStreamEx(IntPtr lpvSupport, IntPtr lpStream, IntPtr lpszStreamName, uint ulFlags, IntPtr lpMessage, ushort wKeyVal, IntPtr lpAdressBook, IntPtr lppTNEF);
"@
$api = Add-Type -MemberDefinition $sig -Name 'MAPI32_OpenTnefStreamEx' -Namespace Win32 -PassThru
# $api::OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)#uselib "MAPI32.dll"
#func global OpenTnefStreamEx "OpenTnefStreamEx" sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr
; OpenTnefStreamEx lpvSupport, lpStream, varptr(lpszStreamName), ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF ; 戻り値は stat
; lpvSupport : void* in/out -> "sptr"
; lpStream : IStream* -> "sptr"
; lpszStreamName : CHAR* -> "sptr"
; ulFlags : DWORD -> "sptr"
; lpMessage : IMessage* -> "sptr"
; wKeyVal : WORD -> "sptr"
; lpAdressBook : IAddrBook* -> "sptr"
; lppTNEF : ITnef** out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "MAPI32.dll" #cfunc global OpenTnefStreamEx "OpenTnefStreamEx" sptr, sptr, var, int, sptr, int, sptr, sptr ; res = OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF) ; lpvSupport : void* in/out -> "sptr" ; lpStream : IStream* -> "sptr" ; lpszStreamName : CHAR* -> "var" ; ulFlags : DWORD -> "int" ; lpMessage : IMessage* -> "sptr" ; wKeyVal : WORD -> "int" ; lpAdressBook : IAddrBook* -> "sptr" ; lppTNEF : ITnef** out -> "sptr" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "MAPI32.dll" #cfunc global OpenTnefStreamEx "OpenTnefStreamEx" sptr, sptr, sptr, int, sptr, int, sptr, sptr ; res = OpenTnefStreamEx(lpvSupport, lpStream, varptr(lpszStreamName), ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF) ; lpvSupport : void* in/out -> "sptr" ; lpStream : IStream* -> "sptr" ; lpszStreamName : CHAR* -> "sptr" ; ulFlags : DWORD -> "int" ; lpMessage : IMessage* -> "sptr" ; wKeyVal : WORD -> "int" ; lpAdressBook : IAddrBook* -> "sptr" ; lppTNEF : ITnef** out -> "sptr" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; HRESULT OpenTnefStreamEx(void* lpvSupport, IStream* lpStream, CHAR* lpszStreamName, DWORD ulFlags, IMessage* lpMessage, WORD wKeyVal, IAddrBook* lpAdressBook, ITnef** lppTNEF) #uselib "MAPI32.dll" #cfunc global OpenTnefStreamEx "OpenTnefStreamEx" intptr, intptr, var, int, intptr, int, intptr, intptr ; res = OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF) ; lpvSupport : void* in/out -> "intptr" ; lpStream : IStream* -> "intptr" ; lpszStreamName : CHAR* -> "var" ; ulFlags : DWORD -> "int" ; lpMessage : IMessage* -> "intptr" ; wKeyVal : WORD -> "int" ; lpAdressBook : IAddrBook* -> "intptr" ; lppTNEF : ITnef** out -> "intptr" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; HRESULT OpenTnefStreamEx(void* lpvSupport, IStream* lpStream, CHAR* lpszStreamName, DWORD ulFlags, IMessage* lpMessage, WORD wKeyVal, IAddrBook* lpAdressBook, ITnef** lppTNEF) #uselib "MAPI32.dll" #cfunc global OpenTnefStreamEx "OpenTnefStreamEx" intptr, intptr, intptr, int, intptr, int, intptr, intptr ; res = OpenTnefStreamEx(lpvSupport, lpStream, varptr(lpszStreamName), ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF) ; lpvSupport : void* in/out -> "intptr" ; lpStream : IStream* -> "intptr" ; lpszStreamName : CHAR* -> "intptr" ; ulFlags : DWORD -> "int" ; lpMessage : IMessage* -> "intptr" ; wKeyVal : WORD -> "int" ; lpAdressBook : IAddrBook* -> "intptr" ; lppTNEF : ITnef** out -> "intptr" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
mapi32 = windows.NewLazySystemDLL("MAPI32.dll")
procOpenTnefStreamEx = mapi32.NewProc("OpenTnefStreamEx")
)
// lpvSupport (void* in/out), lpStream (IStream*), lpszStreamName (CHAR*), ulFlags (DWORD), lpMessage (IMessage*), wKeyVal (WORD), lpAdressBook (IAddrBook*), lppTNEF (ITnef** out)
r1, _, err := procOpenTnefStreamEx.Call(
uintptr(lpvSupport),
uintptr(lpStream),
uintptr(lpszStreamName),
uintptr(ulFlags),
uintptr(lpMessage),
uintptr(wKeyVal),
uintptr(lpAdressBook),
uintptr(lppTNEF),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // HRESULTfunction OpenTnefStreamEx(
lpvSupport: Pointer; // void* in/out
lpStream: Pointer; // IStream*
lpszStreamName: Pointer; // CHAR*
ulFlags: DWORD; // DWORD
lpMessage: Pointer; // IMessage*
wKeyVal: Word; // WORD
lpAdressBook: Pointer; // IAddrBook*
lppTNEF: Pointer // ITnef** out
): Integer; stdcall;
external 'MAPI32.dll' name 'OpenTnefStreamEx';result := DllCall("MAPI32\OpenTnefStreamEx"
, "Ptr", lpvSupport ; void* in/out
, "Ptr", lpStream ; IStream*
, "Ptr", lpszStreamName ; CHAR*
, "UInt", ulFlags ; DWORD
, "Ptr", lpMessage ; IMessage*
, "UShort", wKeyVal ; WORD
, "Ptr", lpAdressBook ; IAddrBook*
, "Ptr", lppTNEF ; ITnef** out
, "Int") ; return: HRESULT●OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF) = DLL("MAPI32.dll", "int OpenTnefStreamEx(void*, void*, void*, dword, void*, int, void*, void*)")
# 呼び出し: OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)
# lpvSupport : void* in/out -> "void*"
# lpStream : IStream* -> "void*"
# lpszStreamName : CHAR* -> "void*"
# ulFlags : DWORD -> "dword"
# lpMessage : IMessage* -> "void*"
# wKeyVal : WORD -> "int"
# lpAdressBook : IAddrBook* -> "void*"
# lppTNEF : ITnef** out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。const std = @import("std");
extern "mapi32" fn OpenTnefStreamEx(
lpvSupport: ?*anyopaque, // void* in/out
lpStream: ?*anyopaque, // IStream*
lpszStreamName: [*c]i8, // CHAR*
ulFlags: u32, // DWORD
lpMessage: ?*anyopaque, // IMessage*
wKeyVal: u16, // WORD
lpAdressBook: ?*anyopaque, // IAddrBook*
lppTNEF: ?*anyopaque // ITnef** out
) callconv(std.os.windows.WINAPI) i32;proc OpenTnefStreamEx(
lpvSupport: pointer, # void* in/out
lpStream: pointer, # IStream*
lpszStreamName: ptr int8, # CHAR*
ulFlags: uint32, # DWORD
lpMessage: pointer, # IMessage*
wKeyVal: uint16, # WORD
lpAdressBook: pointer, # IAddrBook*
lppTNEF: pointer # ITnef** out
): int32 {.importc: "OpenTnefStreamEx", stdcall, dynlib: "MAPI32.dll".}pragma(lib, "mapi32");
extern(Windows)
int OpenTnefStreamEx(
void* lpvSupport, // void* in/out
void* lpStream, // IStream*
byte* lpszStreamName, // CHAR*
uint ulFlags, // DWORD
void* lpMessage, // IMessage*
ushort wKeyVal, // WORD
void* lpAdressBook, // IAddrBook*
void* lppTNEF // ITnef** out
);ccall((:OpenTnefStreamEx, "MAPI32.dll"), stdcall, Int32,
(Ptr{Cvoid}, Ptr{Cvoid}, Ptr{Int8}, UInt32, Ptr{Cvoid}, UInt16, Ptr{Cvoid}, Ptr{Cvoid}),
lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)
# lpvSupport : void* in/out -> Ptr{Cvoid}
# lpStream : IStream* -> Ptr{Cvoid}
# lpszStreamName : CHAR* -> Ptr{Int8}
# ulFlags : DWORD -> UInt32
# lpMessage : IMessage* -> Ptr{Cvoid}
# wKeyVal : WORD -> UInt16
# lpAdressBook : IAddrBook* -> Ptr{Cvoid}
# lppTNEF : ITnef** out -> Ptr{Cvoid}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。local ffi = require("ffi")
ffi.cdef[[
int32_t OpenTnefStreamEx(
void* lpvSupport,
void* lpStream,
int8_t* lpszStreamName,
uint32_t ulFlags,
void* lpMessage,
uint16_t wKeyVal,
void* lpAdressBook,
void* lppTNEF);
]]
local mapi32 = ffi.load("mapi32")
-- mapi32.OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)
-- lpvSupport : void* in/out
-- lpStream : IStream*
-- lpszStreamName : CHAR*
-- ulFlags : DWORD
-- lpMessage : IMessage*
-- wKeyVal : WORD
-- lpAdressBook : IAddrBook*
-- lppTNEF : ITnef** out
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。const koffi = require('koffi');
const lib = koffi.load('MAPI32.dll');
const OpenTnefStreamEx = lib.func('__stdcall', 'OpenTnefStreamEx', 'int32_t', ['void *', 'void *', 'int8_t *', 'uint32_t', 'void *', 'uint16_t', 'void *', 'void *']);
// OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)
// lpvSupport : void* in/out -> 'void *'
// lpStream : IStream* -> 'void *'
// lpszStreamName : CHAR* -> 'int8_t *'
// ulFlags : DWORD -> 'uint32_t'
// lpMessage : IMessage* -> 'void *'
// wKeyVal : WORD -> 'uint16_t'
// lpAdressBook : IAddrBook* -> 'void *'
// lppTNEF : ITnef** out -> 'void *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。const lib = Deno.dlopen("MAPI32.dll", {
OpenTnefStreamEx: { parameters: ["pointer", "pointer", "pointer", "u32", "pointer", "u16", "pointer", "pointer"], result: "i32" },
});
// lib.symbols.OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF)
// lpvSupport : void* in/out -> "pointer"
// lpStream : IStream* -> "pointer"
// lpszStreamName : CHAR* -> "pointer"
// ulFlags : DWORD -> "u32"
// lpMessage : IMessage* -> "pointer"
// wKeyVal : WORD -> "u16"
// lpAdressBook : IAddrBook* -> "pointer"
// lppTNEF : ITnef** out -> "pointer"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
int32_t OpenTnefStreamEx(
void* lpvSupport,
void* lpStream,
int8_t* lpszStreamName,
uint32_t ulFlags,
void* lpMessage,
uint16_t wKeyVal,
void* lpAdressBook,
void* lppTNEF);
C, "MAPI32.dll");
// $ffi->OpenTnefStreamEx(lpvSupport, lpStream, lpszStreamName, ulFlags, lpMessage, wKeyVal, lpAdressBook, lppTNEF);
// lpvSupport : void* in/out
// lpStream : IStream*
// lpszStreamName : CHAR*
// ulFlags : DWORD
// lpMessage : IMessage*
// wKeyVal : WORD
// lpAdressBook : IAddrBook*
// lppTNEF : ITnef** out
// 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
// WINAPI(stdcall): x64 では呼出規約が統一されるため問題なし。x86 では __stdcall 対応のラッパが必要な場合あり。import com.sun.jna.*;
import com.sun.jna.ptr.*;
import com.sun.jna.win32.StdCallLibrary;
import com.sun.jna.win32.W32APIOptions;
public interface Mapi32 extends StdCallLibrary {
Mapi32 INSTANCE = Native.load("mapi32", Mapi32.class);
int OpenTnefStreamEx(
Pointer lpvSupport, // void* in/out
Pointer lpStream, // IStream*
byte[] lpszStreamName, // CHAR*
int ulFlags, // DWORD
Pointer lpMessage, // IMessage*
short wKeyVal, // WORD
Pointer lpAdressBook, // IAddrBook*
Pointer lppTNEF // ITnef** out
);
}@[Link("mapi32")]
lib LibMAPI32
fun OpenTnefStreamEx = OpenTnefStreamEx(
lpvSupport : Void*, # void* in/out
lpStream : Void*, # IStream*
lpszStreamName : Int8*, # CHAR*
ulFlags : UInt32, # DWORD
lpMessage : Void*, # IMessage*
wKeyVal : UInt16, # WORD
lpAdressBook : Void*, # IAddrBook*
lppTNEF : Void* # ITnef** out
) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef OpenTnefStreamExNative = Int32 Function(Pointer<Void>, Pointer<Void>, Pointer<Int8>, Uint32, Pointer<Void>, Uint16, Pointer<Void>, Pointer<Void>);
typedef OpenTnefStreamExDart = int Function(Pointer<Void>, Pointer<Void>, Pointer<Int8>, int, Pointer<Void>, int, Pointer<Void>, Pointer<Void>);
final OpenTnefStreamEx = DynamicLibrary.open('MAPI32.dll')
.lookupFunction<OpenTnefStreamExNative, OpenTnefStreamExDart>('OpenTnefStreamEx');
// lpvSupport : void* in/out -> Pointer<Void>
// lpStream : IStream* -> Pointer<Void>
// lpszStreamName : CHAR* -> Pointer<Int8>
// ulFlags : DWORD -> Uint32
// lpMessage : IMessage* -> Pointer<Void>
// wKeyVal : WORD -> Uint16
// lpAdressBook : IAddrBook* -> Pointer<Void>
// lppTNEF : ITnef** out -> Pointer<Void>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function OpenTnefStreamEx(
lpvSupport: Pointer; // void* in/out
lpStream: Pointer; // IStream*
lpszStreamName: Pointer; // CHAR*
ulFlags: DWORD; // DWORD
lpMessage: Pointer; // IMessage*
wKeyVal: Word; // WORD
lpAdressBook: Pointer; // IAddrBook*
lppTNEF: Pointer // ITnef** out
): Integer; stdcall;
external 'MAPI32.dll' name 'OpenTnefStreamEx';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "OpenTnefStreamEx"
c_OpenTnefStreamEx :: Ptr () -> Ptr () -> Ptr Int8 -> Word32 -> Ptr () -> Word16 -> Ptr () -> Ptr () -> IO Int32
-- lpvSupport : void* in/out -> Ptr ()
-- lpStream : IStream* -> Ptr ()
-- lpszStreamName : CHAR* -> Ptr Int8
-- ulFlags : DWORD -> Word32
-- lpMessage : IMessage* -> Ptr ()
-- wKeyVal : WORD -> Word16
-- lpAdressBook : IAddrBook* -> Ptr ()
-- lppTNEF : ITnef** out -> Ptr ()
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let opentnefstreamex =
foreign "OpenTnefStreamEx"
((ptr void) @-> (ptr void) @-> (ptr int8_t) @-> uint32_t @-> (ptr void) @-> uint16_t @-> (ptr void) @-> (ptr void) @-> returning int32_t)
(* lpvSupport : void* in/out -> (ptr void) *)
(* lpStream : IStream* -> (ptr void) *)
(* lpszStreamName : CHAR* -> (ptr int8_t) *)
(* ulFlags : DWORD -> uint32_t *)
(* lpMessage : IMessage* -> (ptr void) *)
(* wKeyVal : WORD -> uint16_t *)
(* lpAdressBook : IAddrBook* -> (ptr void) *)
(* lppTNEF : ITnef** out -> (ptr void) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library mapi32 (t "MAPI32.dll"))
(cffi:use-foreign-library mapi32)
(cffi:defcfun ("OpenTnefStreamEx" open-tnef-stream-ex :convention :stdcall) :int32
(lpv-support :pointer) ; void* in/out
(lp-stream :pointer) ; IStream*
(lpsz-stream-name :pointer) ; CHAR*
(ul-flags :uint32) ; DWORD
(lp-message :pointer) ; IMessage*
(w-key-val :uint16) ; WORD
(lp-adress-book :pointer) ; IAddrBook*
(lpp-tnef :pointer)) ; ITnef** out
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $OpenTnefStreamEx = Win32::API::More->new('MAPI32',
'int OpenTnefStreamEx(LPVOID lpvSupport, LPVOID lpStream, LPVOID lpszStreamName, DWORD ulFlags, LPVOID lpMessage, WORD wKeyVal, LPVOID lpAdressBook, LPVOID lppTNEF)');
# my $ret = $OpenTnefStreamEx->Call($lpvSupport, $lpStream, $lpszStreamName, $ulFlags, $lpMessage, $wKeyVal, $lpAdressBook, $lppTNEF);
# lpvSupport : void* in/out -> LPVOID
# lpStream : IStream* -> LPVOID
# lpszStreamName : CHAR* -> LPVOID
# ulFlags : DWORD -> DWORD
# lpMessage : IMessage* -> LPVOID
# wKeyVal : WORD -> WORD
# lpAdressBook : IAddrBook* -> LPVOID
# lppTNEF : ITnef** out -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。関連項目
類似 API
- f OpenTnefStream — TNEF形式のストリームを開いてTNEFオブジェクトを取得する。