robot对DELPHI中GRID控件的识别问题

ColWidth(iTemp) = iWidth

iTemp = iTemp 1

wend

End if

strColPos = 20

if CInt(strCol) <> 1 then

for iTemp = 1 to CInt(strCol)-1

strColPos = strColPos ColWidth(iTemp-1)

next iTemp

End if

for iTemp = 1 to CInt(strRow)

strRowPos = 24 strRowPos

next iTemp

strCor = "Coords=" & strColPos &"," CStr(strRowPos)

GenericObject Click, strObject, strCor

InputKeys strValue

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!