diff options
Diffstat (limited to 'oleacc_amd64.go')
-rw-r--r-- | oleacc_amd64.go | 88 |
1 files changed, 88 insertions, 0 deletions
diff --git a/oleacc_amd64.go b/oleacc_amd64.go new file mode 100644 index 00000000..b88858b4 --- /dev/null +++ b/oleacc_amd64.go @@ -0,0 +1,88 @@ +// Copyright 2010 The win Authors. All rights reserved. +// Use of this source code is governed by a BSD-style +// license that can be found in the LICENSE file. + +// +build windows + +package win + +import ( + "syscall" + "unsafe" +) + +// SetPropValue identifies the accessible element to be annotated, specify the property to be annotated, and provide a new value for that property. +// If server developers know the HWND of the accessible element they want to annotate, they can use one of the following methods: SetHwndPropStr, SetHwndProp, or SetHwndPropServer +func (obj *IAccPropServices) SetPropValue(idString []byte, idProp *MSAAPROPID, v *VARIANT) HRESULT { + var idStringPtr unsafe.Pointer + idStringLen := len(idString) + if idStringLen != 0 { + idStringPtr = unsafe.Pointer(&idString[0]) + } + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetPropValue, 5, + uintptr(unsafe.Pointer(obj)), + uintptr(idStringPtr), + uintptr(idStringLen), + uintptr(unsafe.Pointer(idProp)), + uintptr(unsafe.Pointer(v)), + 0) + return HRESULT(ret) +} + +// SetHwndProp wraps SetPropValue, providing a convenient entry point for callers who are annotating HWND-based accessible elements. If the new value is a string, you can use SetHwndPropStr instead. +func (obj *IAccPropServices) SetHwndProp(hwnd HWND, idObject int32, idChild uint32, idProp *MSAAPROPID, v *VARIANT) HRESULT { + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetHwndProp, 6, + uintptr(unsafe.Pointer(obj)), + uintptr(hwnd), + uintptr(idObject), + uintptr(idChild), + uintptr(unsafe.Pointer(idProp)), + uintptr(unsafe.Pointer(v))) + return HRESULT(ret) +} + +// SetHwndPropStr wraps SetPropValue, providing a more convenient entry point for callers who are annotating HWND-based accessible elements. +func (obj *IAccPropServices) SetHwndPropStr(hwnd HWND, idObject int32, idChild uint32, idProp *MSAAPROPID, str string) HRESULT { + str16, err := syscall.UTF16PtrFromString(str) + if err != nil { + return -((E_INVALIDARG ^ 0xFFFFFFFF) + 1) + } + ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetHwndPropStr, 7, + uintptr(unsafe.Pointer(obj)), + uintptr(hwnd), + uintptr(idObject), + uintptr(idChild), + uintptr(unsafe.Pointer(idProp)), + 0, + uintptr(unsafe.Pointer(str16)), + 0, 0) + return HRESULT(ret) +} + +// SetHmenuProp wraps SetPropValue, providing a convenient entry point for callers who are annotating HMENU-based accessible elements. If the new value is a string, you can use IAccPropServices::SetHmenuPropStr instead. +func (obj *IAccPropServices) SetHmenuProp(hmenu HMENU, idChild uint32, idProp *MSAAPROPID, v *VARIANT) HRESULT { + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetHmenuProp, 5, + uintptr(unsafe.Pointer(obj)), + uintptr(hmenu), + uintptr(idChild), + uintptr(unsafe.Pointer(idProp)), + uintptr(unsafe.Pointer(v)), + 0) + return HRESULT(ret) +} + +// SetHmenuPropStr wraps SetPropValue, providing a more convenient entry point for callers who are annotating HMENU-based accessible elements. +func (obj *IAccPropServices) SetHmenuPropStr(hmenu HMENU, idChild uint32, idProp *MSAAPROPID, str string) HRESULT { + str16, err := syscall.UTF16PtrFromString(str) + if err != nil { + return -((E_INVALIDARG ^ 0xFFFFFFFF) + 1) + } + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetHmenuPropStr, 5, + uintptr(unsafe.Pointer(obj)), + uintptr(hmenu), + uintptr(idChild), + uintptr(unsafe.Pointer(idProp)), + uintptr(unsafe.Pointer(str16)), + 0) + return HRESULT(ret) +} |