各位老大怎样在其它程序的窗体上添加一个按钮，并单击该按钮时运行我的过程？(100分)

各位老大怎样在其它程序的窗体上添加一个按钮，并单击该按钮时运行我的过程？<br>谢了。

是写插件了吧：<br>参考——————<br>http://www.delphibbs.com/keylife/iblog_show.asp?xid=5021<br>http://www.delphibbs.com/keylife/iblog_show.asp?xid=5022

hongxing_dl,的文件我看过了。我是吃饱饭没是干的，来发分了，也来学点东东玩玩。<br>前天我看到一个例子，是在这里的论坛的。<br>自已写一个程序给WINDOW的记事本程序添加一个菜单，但是没有能作到给菜单添加事件。我是想给记事一添加一个按钮，单击时它出现我运行的过程。各位大哥看有没有办法。<br>这方法和游戏的外挂有什么区别？莱莱莱的问题，大家知道的就跟说说。不知道的也来这里共学习学习。

我能给Delphi 的IDE 增加菜单和按钮， 也可以响应我的事件， <br>在其它程序上我没有试过，关键是怎样响应事件，大家一起研究！

Delphi 的IDE 有接口啊，我想在其它程序上实现。

学习，有例子吗，各位，学习学习。

unit main;<br><br>interface<br><br>uses<br>&nbsp; Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,<br>&nbsp; StdCtrls;<br><br>type<br>&nbsp; TForm1 = class(TForm)<br>&nbsp; &nbsp; procedure ButtonMouseUp(Sender: TObject; Button: TMouseButton;Shift: TShiftState; X, Y: Integer);<br>&nbsp; &nbsp; procedure ButtonMouseDown(Sender: TObject; Button: TMouseButton;Shift: TShiftState; X, Y: Integer);<br>&nbsp; &nbsp; procedure FormDestroy(Sender: TObject);<br>&nbsp; &nbsp; procedure FormActivate(Sender: TObject);<br>&nbsp; private<br>&nbsp; &nbsp; { Private declarations }<br>&nbsp; public<br>&nbsp; &nbsp; { Public declarations }<br>&nbsp; end;<br><br>var<br>&nbsp; Form1: TForm1;<br>&nbsp; btnNewStart:TButton;<br>&nbsp; Shell_TrayWnd:Hwnd;<br>&nbsp; SystemStartButton:Hwnd;<br>&nbsp; MouseClicked:Boolean=False;<br>implementation<br><br>{$R *.DFM}<br>procedure TForm1.ButtonMouseUp(Sender: TObject; Button: TMouseButton;<br>&nbsp; &nbsp; &nbsp; Shift: TShiftState; X, Y: Integer);<br>begin<br>&nbsp; if PtInRect(btnNewStart.BoundsRect,Point(X,Y)) and MouseClicked then<br>&nbsp; begin[/code]<br>&nbsp; &nbsp; [red]在这儿写你自己的代码[/red]

类似在word中加按钮 要用COM技术 看看 habudog的书 有类似例子

TO dingbaosheng,<br>&nbsp; &nbsp; &nbsp; habudog应该为hubdog<br><br><br>

多谢andy263, 我又知道多了一点。<br>我还想问一下，在一个窗体上没有button.我想在这窗体上添加一个button.，并可运行我的一个过程。<br>还有在其它的窗体上增加了菜单，并运行我的过程呢＞<br>还望andy263多指点一二.

增加按钮和菜单可以考虑 通过修改资源文件的方式 用ResHacker之类的软件<br><br>^_^ &nbsp;否则没有接口的程序比较难实现吧

多人接受答案了。