(问题一大堆)如何根据一个程序里一Edit类组件句柄来对其text内容进行设置?
获取了一个软件里类为Edit的组件句柄,后来我用获取密码的方法才勉强取到里面的字符串,而且用setwindowtext这个函数不能给这个组件设置TEXT,谁有别的好办法吗?在线等~
大虾们帮忙,继续送分~
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
var
myStr: string;
begin
myStr := 'hello world! ';
SendMessage(Edit1.handle, WM_SETTEXT, Length(myStr),integer(@myStr[1]));
end;