view src/if_ole.idl @ 7062:6deb9d802fe4 v7.4.843

commit https://github.com/vim/vim/commit/d43f0951bca162d4491d57df9277b5dbc462944f Author: Bram Moolenaar <Bram@vim.org> Date: Thu Aug 27 22:30:47 2015 +0200 patch 7.4.843 Problem: Still possible to go beyond the end of a string. Solution: Check for NUL also in second string. (Dominique Pelle)
author Christian Brabandt <cb@256bit.org>
date Thu, 27 Aug 2015 22:45:03 +0200
parents 9fbb40a1228a
children
line wrap: on
line source

// if_ole.idl - IDL source for the Vim OLE Automation interface
//
// Processed by the IDL compiler (MIDL) to generate the type library
// (Vim.tlb).
//
// Command line:
//   MIDL /proxy nul /iid iid_ole.c /h if_ole.h /tlb vim.tlb if_ole.idl

[
	object,
	uuid(0F0BFAE2-4C90-11d1-82D7-0004AC368519),  // IID_IVim
	helpstring("IVim"),
	pointer_default(unique),
	dual,
	oleautomation
]
interface IVim : IDispatch
{
	import "oaidl.idl";
	HRESULT SendKeys([in]BSTR keys);
	HRESULT Eval([in]BSTR expr, [out, retval]BSTR* result);
	HRESULT SetForeground(void);
	HRESULT GetHwnd([out, retval]UINT_PTR* result);
};

// Component and type library definitions
[
	uuid(0F0BFAE0-4C90-11d1-82D7-0004AC368519),		// LIBID_Vim
	helpstring("Vim OLE Interface 1.1 Type Library"),
	version(1.1)
]
library Vim
{
	importlib("stdole32.tlb");

	// Component
	[
		uuid(0F0BFAE1-4C90-11d1-82D7-0004AC368519),  // CLSID_Vim
		helpstring("Vim OLE Interface")
	]
	coclass Vim
	{
		[default] interface IVim;
	};
};