如何控制在scrollbox里的一张大图在按scrollbox向下滚动时不让图片跟着动?scrollbox在上下左右滚动时会确发那个事件？

Question

如何控制在scrollbox里的一张大图在按scrollbox向下滚动时不让图片跟着动?scrollbox在上下左右滚动时会确发那个事件？

Answer 1

参考 http://delphi.studysea.net/Article.jsp?ArticleID=97 
改动一下就可以了function NewWindowProc(WindowHandle : hWnd;
                       TheMessage   : WParameter;
                       ParamW       : WParameter;
                       ParamL       : LParameter) : LongInt
{$IFDEF WIN32} stdcall; {$ELSE}  export; {$ENDIF}
begin
  if not ((TheMessage = WM_VSCROLL) or (TheMessage = WM_HSCROLL)) then
  NewWindowProc := CallWindowProc(OldWindowProc,
                                  WindowHandle,
                                  TheMessage,
                                  ParamW,
                                  ParamL);
end;

Answer 2

liangqingzhi(老之) 兄:
    
  我是刚刚接确DELPHI有些看不懂,可不可以再指点一下,怎样改?

Answer 3

scrollbox在上下左右滚动时会触发constrainedResize事件,但是此事件不是一次而是多次

Answer 4

谢谢,已收到!但还有这样一个问题,比如向下按scrollbox时,scrollbox的刻度要变，图片不能跟着动，也就是说ScrollBox1.VertScrollBar.Position的值是要变化的但图片是要不能动的，即图片不能跟scrollbox联动.

Answer 5

我样做的目的是这样的：我在内存里建立一个有800*600的bitbmp，我要将bitbmp放大16倍显示出来，所以我就将bitbmp里的一小块放大16倍后显示到image上，当滚动scrollbox时我将根据ScrollBox1.VertScrollBar.Position秒ScrollBox1.HorzScrollBar.Position的值除以16后来取得对应在bitbmp里的区域来将那块小图StretchBlt放大16倍后到image上显示出来.所以我滚动scrollbox时image不能跟着动.

Answer 6

试试别用ScrollBox，在图片的下方和右方分别放ScrollBar，这样怎么滚动它图片都不会动了。

Answer 7

谢谢，只是感觉scrollbar外观有点难看．

Answer 8

liangqingzhi(老之) 真厚道！