今天必须完工的,请如何要通过句柄修改文本框的值和模拟点击

今天必须完工的,请怎么要通过句柄修改文本框的值和模拟点击
最近做一个工厂用的外卦,就是将一些数据导入原有的软件,

一、可以通过FindWindowEx可得到文本框的句柄,那怎么样修改这个文本框的值?

二、要模拟点击TdxBarControl工具栏上的其一个按钮,有工具栏句柄,但无按钮句柄,要怎么上实现模拟点击?

 求大哥帮帮忙。谢谢了,我的分不够了,加不了分了。



------解决方案--------------------
第一个:
VB code
'sendmessage的时候要注意将最后一个参数选为按值传!否则乱码.
'或在sendmessage申明的时候最后一个参数按值传递
a& = FindWindow("ThunderFormDC", vbNullString)
b& = FindWindowEx(a&, 0, "ThunderTextBox", vbNullString)
Debug.Print a & "===" & b
Dim s As String
s = "测试"
'SendMessage b&, WM_SETTEXT, 0, ByVal s
SendMessage b&, WM_SETTEXT, 0, s

------解决方案--------------------
SPY++查找 工具箱中的按钮图片的句柄 按照二楼的思路 改一下发送内容 按钮Down up