|
| 1 | +// Copyright 2010 The win Authors. All rights reserved. |
| 2 | +// Use of this source code is governed by a BSD-style |
| 3 | +// license that can be found in the LICENSE file. |
| 4 | + |
| 5 | +// +build windows,arm64 |
| 6 | + |
| 7 | +package win |
| 8 | + |
| 9 | +import ( |
| 10 | + "syscall" |
| 11 | + "unsafe" |
| 12 | +) |
| 13 | + |
| 14 | +func (idProp *MSAAPROPID) split() (uintptr, uintptr) { |
| 15 | + if idProp == nil { |
| 16 | + return 0, 0 |
| 17 | + } |
| 18 | + x := (*struct { a, b uintptr })(unsafe.Pointer(idProp)) |
| 19 | + return x.a, x.b |
| 20 | +} |
| 21 | + |
| 22 | +// SetPropValue identifies the accessible element to be annotated, specify the property to be annotated, and provide a new value for that property. |
| 23 | +// 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 |
| 24 | +func (obj *IAccPropServices) SetPropValue(idString []byte, idProp *MSAAPROPID, v *VARIANT) HRESULT { |
| 25 | + var idStringPtr unsafe.Pointer |
| 26 | + idStringLen := len(idString) |
| 27 | + if idStringLen != 0 { |
| 28 | + idStringPtr = unsafe.Pointer(&idString[0]) |
| 29 | + } |
| 30 | + propA, propB := idProp.split() |
| 31 | + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetPropValue, 6, |
| 32 | + uintptr(unsafe.Pointer(obj)), |
| 33 | + uintptr(idStringPtr), |
| 34 | + uintptr(idStringLen), |
| 35 | + propA, propB, |
| 36 | + uintptr(unsafe.Pointer(v))) |
| 37 | + return HRESULT(ret) |
| 38 | +} |
| 39 | + |
| 40 | +// 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. |
| 41 | +func (obj *IAccPropServices) SetHwndProp(hwnd HWND, idObject int32, idChild uint32, idProp *MSAAPROPID, v *VARIANT) HRESULT { |
| 42 | + propA, propB := idProp.split() |
| 43 | + ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetHwndProp, 7, |
| 44 | + uintptr(unsafe.Pointer(obj)), |
| 45 | + uintptr(hwnd), |
| 46 | + uintptr(idObject), |
| 47 | + uintptr(idChild), |
| 48 | + propA, propB, |
| 49 | + uintptr(unsafe.Pointer(v)), |
| 50 | + 0, 0) |
| 51 | + return HRESULT(ret) |
| 52 | +} |
| 53 | + |
| 54 | +// SetHwndPropStr wraps SetPropValue, providing a more convenient entry point for callers who are annotating HWND-based accessible elements. |
| 55 | +func (obj *IAccPropServices) SetHwndPropStr(hwnd HWND, idObject int32, idChild uint32, idProp *MSAAPROPID, str string) HRESULT { |
| 56 | + str16, err := syscall.UTF16PtrFromString(str) |
| 57 | + if err != nil { |
| 58 | + return -((E_INVALIDARG ^ 0xFFFFFFFF) + 1) |
| 59 | + } |
| 60 | + propA, propB := idProp.split() |
| 61 | + ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetHwndPropStr, 7, |
| 62 | + uintptr(unsafe.Pointer(obj)), |
| 63 | + uintptr(hwnd), |
| 64 | + uintptr(idObject), |
| 65 | + uintptr(idChild), |
| 66 | + propA, propB, |
| 67 | + uintptr(unsafe.Pointer(str16)), |
| 68 | + 0, 0) |
| 69 | + return HRESULT(ret) |
| 70 | +} |
| 71 | + |
| 72 | +// 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. |
| 73 | +func (obj *IAccPropServices) SetHmenuProp(hmenu HMENU, idChild uint32, idProp *MSAAPROPID, v *VARIANT) HRESULT { |
| 74 | + propA, propB := idProp.split() |
| 75 | + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetHmenuProp, 6, |
| 76 | + uintptr(unsafe.Pointer(obj)), |
| 77 | + uintptr(hmenu), |
| 78 | + uintptr(idChild), |
| 79 | + propA, propB, |
| 80 | + uintptr(unsafe.Pointer(v))) |
| 81 | + return HRESULT(ret) |
| 82 | +} |
| 83 | + |
| 84 | +// SetHmenuPropStr wraps SetPropValue, providing a more convenient entry point for callers who are annotating HMENU-based accessible elements. |
| 85 | +func (obj *IAccPropServices) SetHmenuPropStr(hmenu HMENU, idChild uint32, idProp *MSAAPROPID, str string) HRESULT { |
| 86 | + str16, err := syscall.UTF16PtrFromString(str) |
| 87 | + if err != nil { |
| 88 | + return -((E_INVALIDARG ^ 0xFFFFFFFF) + 1) |
| 89 | + } |
| 90 | + propA, propB := idProp.split() |
| 91 | + ret, _, _ := syscall.Syscall6(obj.LpVtbl.SetHmenuPropStr, 6, |
| 92 | + uintptr(unsafe.Pointer(obj)), |
| 93 | + uintptr(hmenu), |
| 94 | + uintptr(idChild), |
| 95 | + propA, propB, |
| 96 | + uintptr(unsafe.Pointer(str16))) |
| 97 | + return HRESULT(ret) |
| 98 | +} |
0 commit comments