已知一个edit的句柄，如何得到他的onchange事件？(50分)

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-16

• #1

用windows消息么？

 

S

smilboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-17

• #2

lisstion

 

M

micony

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-17

• #3

有些不太明白，edit中不是以有onchang事件了吗？<br>你要实现的是什么功能呢？

 

秋

秋风萧萧

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-17

• #4

用windows API可以接管窗口的callback函数，其他的消息自己处理<br>EnumThreadWndProc

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-17

• #5

我没写明白<br>这个edit是其他程序的<br><br>秋风萧萧：能给个例子么？

 

J

Jedei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-17

• #6

用Hook

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-11

• #7

哪位大虾来点实惠的<br>给个例子呗！<br>不全也行，核心代码写出来就行！

 

星

星际浪人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-11

• #8

如果单单知道一个 Edit 的句柄，获得它的 OnChange 事件（Delphi 及 BCB 定义的）是不可能的。<br>你想想，这个 Edit 可以是 VC, Delphi, BCB, VB 等创建的，而 VC, VB 等对它的 Change 事件的<br>处理方法并不完全与 Delphi, BCB 的相同。<br>但是，你可以用 Hook 技术拦截这个 Edit 的消息达到类似的效果。<br>

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-12

• #9

对，是用Hook 技术拦截这个 Edit 的消息达到类似的效果。<br><br>星际浪人： 我对hook还不太熟练，能不能给个例子！谢谢！

 

R

Rik

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-12

• #10

coolbaby,请问你是怎样获得这个Edit的句柄的？

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-12

• #11

那好办，可以用findwindowex!

 

初

初学者1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-12

• #12

&gt;

 

D

DragonPC_???

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-13

• #13

有句柄，可以用回调函数SetWindowLong GetWindowLong截获CM_TEXTCHANGED消息，<br><br>如果你想获得一个TEdit的实例句柄，那就不太现实了，除非该程序支持插件技术，你设计<br>一个插件，调用 Application.Components[]可以获得对象实例，Delphi Expert都是这么干得。<br>

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-13

• #14

给段代码吧，大虾！

 

D

DragonPC_???

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-13

• #15

Declear part:<br><br>&nbsp; &nbsp; private<br>&nbsp; &nbsp; &nbsp; &nbsp; FClientInstance,<br>&nbsp; &nbsp; &nbsp; &nbsp; FPrevClientProc : TFarProc;<br>&nbsp; &nbsp; &nbsp; &nbsp; procedure ClientWndProc(var UsrMsg: TMessage);<br><br>OnCreate event:<br>&nbsp; &nbsp; FClientInstance := MakeObjectInstance(ClientWndProc);<br>&nbsp; &nbsp; FPrevClientProc := Pointer(GetWindowLong(EditHandle, GWL_WNDPROC));<br>&nbsp; &nbsp; SetWindowLong(EditHandle, GWL_WNDPROC, LongInt(FClientInstance));<br><br>OnDestoy event:<br>&nbsp; &nbsp; FreeObjectInstance(FClientInstance) ;<br>&nbsp; &nbsp; SetWindowLong(EditHandle, GWL_WNDPROC, LongInt(FPrevClientProc));<br><br>procedure Txxxxx.ClientWndProc(var UsrMsg: TMessage);<br>begin<br>&nbsp; with UsrMsg do<br>&nbsp; &nbsp; Result := CallWindowProc(FPrevClientProc, AppBuilder.Handle, Msg, wParam, lParam);<br>&nbsp; &nbsp; case Msg of<br>&nbsp; &nbsp; &nbsp; &nbsp; CM_TEXTCHANGED: // Do you event handle here ;<br>&nbsp; &nbsp; end ;<br>&nbsp; end;<br>end;<br><br><br>&nbsp; &nbsp; &nbsp; &nbsp; <br>

 

Z

ZXW49362727

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-08-13

• #16

我觉得用SetWindowLong(GWL_WndProc,......)可行！<br>但没有试过！

 

M

micony

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-12

• #17

我觉得只有钩子才能"钩"到你想要的消息

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-30

• #18

end

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-30

• #19

多人接受答案了。