提问:怎么使Listbox和Memo互通消息?(100分)

  • 主题发起人 主题发起人 TaoChina
  • 开始时间 开始时间
T

TaoChina

Unregistered / Unconfirmed
GUEST, unregistred user!
我在Form上放上Listbox和Memo控件各一个,怎样才可以达到下面目的:
当Listbox滚动时,Memo也实时的随之滚动;
同理,点击Memo的ScrollBar时,Listbox也随之滚动?
拜托,给个代码先!
 
截消息再发消息就行了。
代码就不用的吧?
 
两边的数据是不是相同,或相关?
 
没有,我只是想截获memo或Listbox的scrollbar消息,那样就好办了
 
wndproc

sb_vert..
 
截获Memo的WM_VSCROLL消息;
procedure TmainForm.OnAppMessage(var Msg: TMsg; var Handled: Boolean);
begin
if (Msg.message =WM_VSCROLL) and msg.handle=memo.handle then
begin
sendmessage(Listbox.handle,WM_vscroll,Msg.WParam,Msg.LPARAM );
向listbox发送WM_VSCROLL消息
end;
end;
 
perform,sendmessage,or postmessage
 
post post post
 
能不能讲得详细一点啊!
 
后退
顶部