go-tg-screenshot-bot
420 строк · 16.0 Кб
1// Copyright 2010 The win Authors. All rights reserved.2// Use of this source code is governed by a BSD-style3// license that can be found in the LICENSE file.4// +build windows6)13)20)50)87)154)160}167}171}192}196}204}212}220// SetPropServer specifies a callback object to be used to annotate an array of properties for the accessible element. You can also specify whether the annotation is to be applied to this accessible element or to the element and its children. This method is used for server annotation.222// If server developers know the HWND of the accessible element they want to annotate, they can use SetHwndPropServer.223func (obj *IAccPropServices) SetPropServer(idString []byte, idProps []MSAAPROPID, server *IAccPropServer, annoScope AnnoScope) HRESULT {224var idStringPtr unsafe.Pointer225idStringLen := len(idString)226if idStringLen != 0 {227idStringPtr = unsafe.Pointer(&idString[0])228}229var idPropsPtr unsafe.Pointer230idPropsLen := len(idProps)231if idPropsLen != 0 {232idPropsPtr = unsafe.Pointer(&idProps[0])233}234ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetPropServer, 7,235uintptr(unsafe.Pointer(obj)),236uintptr(idStringPtr),237uintptr(idStringLen),238uintptr(idPropsPtr),239uintptr(idPropsLen),240uintptr(unsafe.Pointer(server)),241uintptr(annoScope),2420,2430)244return HRESULT(ret)245}246// ClearProps restores default values to properties of accessible elements that they had previously annotated.248// If servers know the HWND of the object they want to clear, they can use ClearHwndProps.249func (obj *IAccPropServices) ClearProps(idString []byte, idProps []MSAAPROPID) HRESULT {250var idStringPtr unsafe.Pointer251idStringLen := len(idString)252if idStringLen != 0 {253idStringPtr = unsafe.Pointer(&idString[0])254}255var idPropsPtr unsafe.Pointer256idPropsLen := len(idProps)257if idPropsLen != 0 {258idPropsPtr = unsafe.Pointer(&idProps[0])259}260ret, _, _ := syscall.Syscall6(obj.LpVtbl.ClearProps, 5,261uintptr(unsafe.Pointer(obj)),262uintptr(idStringPtr),263uintptr(idStringLen),264uintptr(idPropsPtr),265uintptr(idPropsLen),2660)267return HRESULT(ret)268}269// SetHwndPropServer wraps SetPropServer, providing a convenient entry point for callers who are annotating HWND-based accessible elements.271func (obj *IAccPropServices) SetHwndPropServer(hwnd HWND, idObject int32, idChild uint32, idProps []MSAAPROPID, server *IAccPropServer, annoScope AnnoScope) HRESULT {272var idPropsPtr unsafe.Pointer273idPropsLen := len(idProps)274if idPropsLen != 0 {275idPropsPtr = unsafe.Pointer(&idProps[0])276}277ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetHwndPropServer, 8,278uintptr(unsafe.Pointer(obj)),279uintptr(hwnd),280uintptr(idObject),281uintptr(idChild),282uintptr(idPropsPtr),283uintptr(idPropsLen),284uintptr(unsafe.Pointer(server)),285uintptr(annoScope),2860)287return HRESULT(ret)288}289// ClearHwndProps wraps SetPropValue, SetPropServer, and ClearProps, and provides a convenient entry point for callers who are annotating HWND-based accessible elements.291func (obj *IAccPropServices) ClearHwndProps(hwnd HWND, idObject int32, idChild uint32, idProps []MSAAPROPID) HRESULT {292var idPropsPtr unsafe.Pointer293idPropsLen := len(idProps)294if idPropsLen != 0 {295idPropsPtr = unsafe.Pointer(&idProps[0])296}297ret, _, _ := syscall.Syscall6(obj.LpVtbl.ClearHwndProps, 6,298uintptr(unsafe.Pointer(obj)),299uintptr(hwnd),300uintptr(idObject),301uintptr(idChild),302uintptr(idPropsPtr),303uintptr(idPropsLen))304return HRESULT(ret)305}306// ComposeHwndIdentityString retrievs an identity string.308func (obj *IAccPropServices) ComposeHwndIdentityString(hwnd HWND, idObject int32, idChild uint32) (hr HRESULT, idString []byte) {309var data *[1<<31 - 1]byte310var len uint32311ret, _, _ := syscall.Syscall6(obj.LpVtbl.ComposeHwndIdentityString, 6,312uintptr(unsafe.Pointer(obj)),313uintptr(hwnd),314uintptr(idObject),315uintptr(idChild),316uintptr(unsafe.Pointer(&data)),317uintptr(unsafe.Pointer(&len)))318hr = HRESULT(ret)319if FAILED(hr) {320return321}322defer CoTaskMemFree(uintptr(unsafe.Pointer(data)))323idString = make([]byte, len)324copy(idString, data[:len])325return326}327// DecomposeHwndIdentityString determines the HWND, object ID, and child ID for the accessible element identified by the identity string.329func (obj *IAccPropServices) DecomposeHwndIdentityString(idString []byte) (hr HRESULT, hwnd HWND, idObject int32, idChild uint32) {330var idStringPtr unsafe.Pointer331idStringLen := len(idString)332if idStringLen != 0 {333idStringPtr = unsafe.Pointer(&idString[0])334}335ret, _, _ := syscall.Syscall6(obj.LpVtbl.DecomposeHwndIdentityString, 6,336uintptr(unsafe.Pointer(obj)),337uintptr(idStringPtr),338uintptr(idStringLen),339uintptr(unsafe.Pointer(&hwnd)),340uintptr(unsafe.Pointer(&idObject)),341uintptr(unsafe.Pointer(&idChild)))342hr = HRESULT(ret)343return344}345// SetHmenuPropServer wraps SetPropServer, providing a convenient entry point for callers who are annotating HMENU-based accessible elements.347func (obj *IAccPropServices) SetHmenuPropServer(hmenu HMENU, idChild uint32, idProps []MSAAPROPID, server *IAccPropServer, annoScope AnnoScope) HRESULT {348var idPropsPtr unsafe.Pointer349idPropsLen := len(idProps)350if idPropsLen != 0 {351idPropsPtr = unsafe.Pointer(&idProps[0])352}353ret, _, _ := syscall.Syscall9(obj.LpVtbl.SetHmenuPropServer, 7,354uintptr(unsafe.Pointer(obj)),355uintptr(hmenu),356uintptr(idChild),357uintptr(idPropsPtr),358uintptr(idPropsLen),359uintptr(unsafe.Pointer(server)),360uintptr(annoScope),3610,3620)363return HRESULT(ret)364}365// ClearHmenuProps wraps ClearProps, and provides a convenient entry point for callers who are annotating HMENU-based accessible elements.367func (obj *IAccPropServices) ClearHmenuProps(hmenu HMENU, idChild uint32, idProps []MSAAPROPID) HRESULT {368var idPropsPtr unsafe.Pointer369idPropsLen := len(idProps)370if idPropsLen != 0 {371idPropsPtr = unsafe.Pointer(&idProps[0])372}373ret, _, _ := syscall.Syscall6(obj.LpVtbl.ClearHmenuProps, 5,374uintptr(unsafe.Pointer(obj)),375uintptr(hmenu),376uintptr(idChild),377uintptr(idPropsPtr),378uintptr(idPropsLen),3790)380return HRESULT(ret)381}382// ComposeHmenuIdentityString retrieves an identity string for an HMENU-based accessible element.384func (obj *IAccPropServices) ComposeHmenuIdentityString(hmenu HMENU, idChild uint32) (hr HRESULT, idString []byte) {385var data *[1<<31 - 1]byte386var len uint32387ret, _, _ := syscall.Syscall6(obj.LpVtbl.ComposeHmenuIdentityString, 5,388uintptr(unsafe.Pointer(obj)),389uintptr(hmenu),390uintptr(idChild),391uintptr(unsafe.Pointer(&data)),392uintptr(unsafe.Pointer(&len)),3930)394hr = HRESULT(ret)395if FAILED(hr) {396return397}398defer CoTaskMemFree(uintptr(unsafe.Pointer(data)))399idString = make([]byte, len)400copy(idString, data[:len])401return402}403// DecomposeHmenuIdentityString determines the HMENU, object ID, and child ID for the accessible element identified by the identity string.405func (obj *IAccPropServices) DecomposeHmenuIdentityString(idString []byte) (hr HRESULT, hmenu HMENU, idChild uint32) {406var idStringPtr unsafe.Pointer407idStringLen := len(idString)408if idStringLen != 0 {409idStringPtr = unsafe.Pointer(&idString[0])410}411ret, _, _ := syscall.Syscall6(obj.LpVtbl.DecomposeHmenuIdentityString, 5,412uintptr(unsafe.Pointer(obj)),413uintptr(idStringPtr),414uintptr(idStringLen),415uintptr(unsafe.Pointer(&hmenu)),416uintptr(unsafe.Pointer(&idChild)),4170)418hr = HRESULT(ret)419return420}421