U
ufosxl
Unregistered / Unconfirmed
GUEST, unregistred user!
[]现有一程序窗体类为 Tft1<br>在另一程序运行代码如下:<br>procedure TForm1.Button5Click(Sender: TObject);<br>var<br>btn,hWnd:THandle;<br>begin<br> hWnd:=FindWindow('Tft1', nil);<br> BTN:=FindWindowEx(hWnd,0,'Tedit',nil);<br> SendMessage(BTN,WM_SETTEXT,0,integer(edit1.text)); <br>end;<br>这样只能给 tft1的一个edit付值,怎样二个或多个付值?<br><br>谢谢!!!!!!!!!!!!!!!!<br>[][]