再请教一个关于消息的问题:怎样截获XLGrid的消息、向XLGrid发送消息? 请熟悉XLGrid的朋友进来看看,100分!请知道的朋友关心一下吧,好多天了 :

D

dirk

Unregistered / Unconfirmed
GUEST, unregistred user!
再请教一个关于消息的问题:怎样截获XLGrid的消息、向XLGrid发送消息? 请熟悉XLGrid的朋友进来看看,100分!请知道的朋友关心一下吧,好多天了 :( ! (0分)<br />很多带scroll的delphi控件都不提供onscroll事件,用起来真不方便,我现在用XLGrid1.7
做一个程序,想用一个TScrollbox与XLGrid同步滚动,但截取不到XLGrid的滚动消息,
对TScrollbox到简单,但XLGrid上返回的消息中,怎么也没有WM_HSCROLL消息,我发消息
postmessage(Xlgrid11.Handle ,WM_HSCROLL,SB_LINERIGHT,0);到xlgrid,就是没反应,
记录xlgrid的消息,都是乱七八糟的,照着发回去,也没反应,怎么办?

甚至:
private
oldProc: TWndMethod;
……

procedure TFrm_Main.ToolButton13Click(Sender: TObject);
begin
oldProc:=xlgrid1.WindowProc ;
xlgrid1.WindowProc :=MyProc;
end;

procedure TFrm_Main.MyProc(var Message: TMessage);
begin
postmessage(XLGrid6.Handle ,Message.Msg ,Message.WParam ,Message.LParam );
oldProc(Message);
end;

这样,在拖xlgrid1的滚动条时,xlgrid6都不动,但却响应键盘消息,我监测了一下,发
现在xlgrid的主体上移动鼠标,都没有收到消息,真tmd气死了!怎样才能知道xlgrid在
滚和让xlgrid滚?

这个问题前几天提出过(50分),一直没有人回答,估计这个问题不太会有答案,所以先
删除了,换了个0分的问题再问,如果问题解决,给提供答案者100分!绝不食言!
 
它如果超出边界不是可以自己出现滚动条吗?
 
什么?“它”是指xlgrid还是scrollbox?

滚动条是会出现,但我现在要截获xlgrid滚动的消息,和发送消息让xlgrid滚动,谁有办法
解决吗?

提供100分!
 
i don't know
 
这个问题为什么没有人关注呢?
 
现在的高手都懒得帮人了![:(]
 
Mr. dirk,
你好,你用的是D6下的xlgrid1.7吗?
 
在delphi5下用,不知d6下可不可以用,要的话发给你试试!
 
接受答案了.
 
顶部