home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / pascal / 6557 < prev    next >
Encoding:
Internet Message Format  |  1992-11-14  |  1.6 KB
  1. Path: sparky!uunet!gumby!wupost!psuvax1!psuvm!f0o
  2. Organization: Penn State University
  3. Date: Fri, 13 Nov 1992 09:57:26 EST
  4. From: <F0O@psuvm.psu.edu>
  5. Message-ID: <92318.095726F0O@psuvm.psu.edu>
  6. Newsgroups: comp.lang.pascal
  7. Subject: Scroll bar update problem
  8. Lines: 23
  9.  
  10.    On a project I'm currently working on using TPW 1.0, I'm displaying
  11. a map in a window and using the mouse to zoom in on sections of the map.
  12. When I rubber-band a region and let go of the left mouse button, my
  13. WMLButtonUp routine will get the new coordinate values and set the scroll
  14. bars to their new position using Scroller:.ScrollTo().  The ScrollTo
  15. method is supposed to update the window, I imagine by calling the Paint
  16. method.
  17.    This all works fine the first time I zoom from the full map displayed
  18. in a window to a sub-section of the map.  By then when I try to zoom in
  19. closer, the ScrollTo method does not seem to be calling the Paint method.
  20. The window will not update the second time.  I can force it to by hiding
  21. it behind another window and then making it the active window, in which
  22. case everything looks fine, but the ScrollTo() method should update the
  23. window for me.
  24.    When I run the program in TDW, the first time I step past the ScrollTo()
  25. method and the window is updated, the debugger will switch to the window
  26. as it updates, then go back to the debugger.  However, the next time I
  27. try and zoom in, when I step past the ScrollTo() method, the debugger does
  28. not switch to the window.
  29.    Has anyone else seen this problem or have any idea as to why the
  30. ScrollTo() method does not seem to update the window on the second call?
  31.  
  32.                                                                  [Tim]
  33.