从外部程序向控件中写入内容
时代码农 2006-04-29 02:38:12 各位大哥:
我想在一个VFP程序SY1.EXE向另一个VFP程序SY2.EXE中TEXTBOX控件赋值。
declare integer FindWindow IN WIN32API STRING,STRING
Declare INTEGER FindWindowEx IN WIN32API INTEGER,INTEGER,STRING,STRING
Declare INTEGER SetWindowText IN WIN32API INTEGER,String
Declare INTEGER SendMessage IN WIN32API INTEGER,INTEGER,INTEGER,STRING
LOCAL cTitle
cTitle="输入表单"
LS_HANDLE=FindWindow(0,ctitle)
IF LS_HANDLE<>0
LS_HANDLE_CONTROL=FindWindowEx(LS_HANDLE,0,0,0) &&SY2只有一个表单,表单只有一个控件就是那个TEXT.
IF LS_HANDLE_CONTROL<>0
SetWindowText(LS_HANDLELS_HANDLE_CONTROL,"AAAAAAAAAAAAAA成功")
SendMessage(LS_HANDLE_CONTROL,12,0,"AAAAAAAAAAAAAA成功")
ENDIF
endif
运行情况,那个表单的窗口的句柄能找到,如果对LS_HANDLE SetWindowText可以改变表单标题,
控件TEXT的句柄 LS_HANDLE_CONTROL 能找到,也是大于0 的整数,但无论是 SETWINDOWTEXT 还是 SENDMESSAGE都无法给TEXT赋值。
已经搞了好久了,都不知道为什么,我是刚学API,资料都是从网上查的。
请大家帮帮忙吧,谢谢!!!!!!