| OLE/SML# |
structure OLE : OLE =
struct
open OLE_DataConverter
structure OLEString = UTF16LECodec.String
structure Decimal = OLE_Decimal
structure SafeArray = OLE_SafeArray
type string = UTF16LECodec.String.string
type decimal = Decimal.decimal
type Unknown = OLE_COM.Unknown
type 'a safearray = 'a Automation.safearray
type TypeInfo = Automation.TypeInfo
type Dispatch = Automation.Dispatch
type EnumVARIANT = Automation.EnumVARIANT
datatype coinit = datatype OLE_COM.coinit
datatype variant = datatype Automation.variant
datatype error = datatype OLE_Error.error
exception OLEError = OLE_Error.OLEError
val initialize : coinit list -> unit
val uninitialize : unit -> unit
val NullUnknown : Unknown
val isNullUnknown : Unknown -> bool
val wrapUnknown : UnmanagedMemory.address -> Unknown
val createInstanceOfProgID : string -> Dispatch
val createInstanceOfCLSID : string -> Dispatch
val getObject : string -> Dispatch
val wrapDispatch : Unknown -> Dispatch
val wrapEnumVARIANT : Unknown -> EnumVARIANT
val variantToString : variant -> String.string
val NullDispatch : Dispatch
val isNullDispatch : Dispatch -> bool
val NOPARAM : variant
val L : String.string -> string
val A : string -> String.string
val fold_enum : (variant * 'accum -> 'accum) -> 'accum -> Dispatch -> 'accum
val for_each : (variant -> unit) -> Dispatch -> unit
val enumAll : Dispatch -> variant list
end
| Type detail |
|---|
type string = UTF16LECodec.String.string
type decimal = Decimal.decimal
type Unknown = OLE_COM.Unknown
type 'a safearray = 'a Automation.safearray
type TypeInfo = Automation.TypeInfo
type Dispatch = Automation.Dispatch
type EnumVARIANT = Automation.EnumVARIANT
| Datatype detail |
|---|
datatype coinit = datatype OLE_COM.coinit
datatype variant = datatype Automation.variant
datatype error = datatype OLE_Error.error
| Value detail |
|---|
val initialize : coinit list -> unit
val uninitialize : unit -> unit
val NullUnknown : Unknown
val isNullUnknown : Unknown -> bool
val wrapUnknown : UnmanagedMemory.address -> Unknown
val createInstanceOfProgID : string -> Dispatch
val createInstanceOfCLSID : string -> Dispatch
val getObject : string -> Dispatch
val wrapDispatch : Unknown -> Dispatch
val wrapEnumVARIANT : Unknown -> EnumVARIANT
val variantToString : variant -> String.string
val NullDispatch : Dispatch
val isNullDispatch : Dispatch -> bool
val NOPARAM : variant
val L : String.string -> string
val A : string -> String.string
val fold_enum : (variant * 'accum -> 'accum) -> 'accum -> Dispatch -> 'accum
val for_each : (variant -> unit) -> Dispatch -> unit
val enumAll : Dispatch -> variant list
| Exception detail |
|---|
exception OLEError = OLE_Error.OLEError
| OLE/SML# |