请问如何取得其它运行程序窗口中的控件数据保存在自己的程序中?急啊.... ( 积分: 200 )

  • 主题发起人 主题发起人 qylin1
  • 开始时间 开始时间
Q

qylin1

Unregistered / Unconfirmed
GUEST, unregistred user!
有一个正在运行的程序窗口,里面有Grid/Label等控件,请问用什么方法可以取得这些控件的文本并保存到自己的程序窗口中?<br><br>十万火急呀,谢谢了
 
有一个正在运行的程序窗口,里面有Grid/Label等控件,请问用什么方法可以取得这些控件的文本并保存到自己的程序窗口中?<br><br>十万火急呀,谢谢了
 
利用消息和钩子应该可以做到,不过我不会
 
用线程插入可以实现,网上去找例子。
 
这个有点难度啊
 
http://www.2ccc.com/article.asp?articleid=1911
 
dbgrid 和lable &nbsp;我到现在也没有个头绪 ,顶下看看有没有高人
 
首先取得当前窗口句柄(可以使用GetActiveWindow函数),之后就可以利用该句柄完成你要的数据.
 
这是控件保存成文件与返过程,不过你是要把EDIT的内容TEXT,还是EDIT的HEIGHT等属性保存进来,也没说得怎么样清楚,真是的。说清楚点。<br>precudre ComponentToFile(Component: TComponent,filename:String);<br>var<br> &nbsp;BinStream:TMemoryStream;<br>begin<br> try<br> &nbsp;BinStream := TMemoryStream.Create;<br> &nbsp;BinStream.WriteComponent(Component);<br> &nbsp;BinStream.SaveToFile(filename);<br> &nbsp;finally<br> &nbsp; &nbsp;BinStream.Free<br> &nbsp;end;<br>end;<br><br>function FileToComponent(Value: String;var Com:TComponent);<br>var<br> &nbsp;StrStream:TStringStream;<br> &nbsp;BinStream: TMemoryStream;<br> &nbsp;tempcom:TComponent &nbsp; <br>i:integer;<br> &nbsp; tc:TClass;<br>begin<br> &nbsp;tc:=tc.classtype;<br> &nbsp;tempform:=tc.create(nil);<br> &nbsp;for i=0 to tempcom.componentcount-1 do<br> &nbsp; &nbsp;tempform.Components.Free;<br> &nbsp; &nbsp;BinStream := TMemoryStream.Create;<br> &nbsp; &nbsp;try<br> &nbsp; &nbsp; binStream.loadfrom(value);<br> &nbsp; &nbsp; BinStream.Seek(0, soFromBeginning);<br> &nbsp; &nbsp; com :=BinStream.ReadComponent(tempform);<br> &nbsp; &nbsp;finally<br> &nbsp; &nbsp; &nbsp; &nbsp;BinStream.Free;<br> &nbsp; end;<br>end;
 
后退
顶部