Mercurial > vim
view src/VisVim/OleAut.h @ 20142:fe8d0a4344df v8.2.0626
patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script
Commit: https://github.com/vim/vim/commit/f93c7fea084a99848d512ff2732041d4b41d93c8
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Apr 23 22:16:53 2020 +0200
patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script
Problem: Vim9: wrong syntax of function in Vim9 script.
Solution: Give error for missing space. Implement :echomsg and :echoerr.
(closes #5670)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Thu, 23 Apr 2020 22:30:03 +0200 |
parents | 3fc0f57ecb91 |
children |
line wrap: on
line source
#ifndef __OLEAUT_H__ #define __OLEAUT_H__ class COleAutomationControl : public CObject { public: COleAutomationControl (); ~COleAutomationControl (); bool CreateObject (char* ProgId); DISPID GetDispatchId (char* Name); bool GetProperty (char* Name); bool GetProperty (DISPID DispatchId); bool PutProperty (char* Name, LPCTSTR Format, ...); bool PutProperty (DISPID DispatchId, LPCTSTR Format, ...); bool Method (char* Name, LPCTSTR Format = NULL, ...); bool Method (DISPID DispatchId, LPCTSTR Format = NULL, ...); void DeleteObject (); void ErrDiag (); bool IsCreated () { return m_pDispatch ? true : false; } bool IsAlive (); HRESULT GetResult () { return m_hResult; } UINT GetErrArgNr () { return m_nErrArg; } EXCEPINFO* GetExceptionInfo () { return &m_ExceptionInfo; } LPVARIANT GetResultVariant () { return &m_VariantResult; } protected: bool Invoke (WORD Flags, char* Name, LPCTSTR Format, va_list ArgList); bool Invoke (WORD Flags, DISPID DispatchId, LPCTSTR Format, va_list ArgList); protected: IDispatch* m_pDispatch; HRESULT m_hResult; UINT m_nErrArg; EXCEPINFO m_ExceptionInfo; VARIANTARG m_VariantResult; }; #ifdef UNICODE #define FROM_OLE_STRING(str) str #define FROM_OLE_STRING_BUF(str,buf) str #define TO_OLE_STR(str) str #define TO_OLE_STR_BUF(str,buf) str #define MAX_OLE_STR 1 #else #define FROM_OLE_STR(str) ConvertToAnsi(str) #define FROM_OLE_STR_BUF(str,buf) ConvertToAnsiBuf(str,buf) char* ConvertToAnsi (OLECHAR* sUnicode); char* ConvertToAnsiBuf (OLECHAR* sUnicode, char* Buf); #define TO_OLE_STR(str) ConvertToUnicode(str) #define TO_OLE_STR_BUF(str,buf) ConvertToUnicodeBuf(str,buf) OLECHAR* ConvertToUnicode (char* sAscii); OLECHAR* ConvertToUnicodeBuf (char* sAscii, OLECHAR* Buf); // Maximum length of string that can be converted between Ansi & Unicode #define MAX_OLE_STR 500 #endif #endif // __OLEAUT_H__