ZScrollView.m 950 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172
  1. #import "qedefs.h"
  2. @implementation ZScrollView
  3. /*
  4. ====================
  5. initFrame: button:
  6. Initizes a scroll view with a button at it's lower right corner
  7. ====================
  8. */
  9. - initFrame:(const NXRect *)frameRect button1:b1
  10. {
  11. [super initFrame: frameRect];
  12. [self addSubview: b1];
  13. button1 = b1;
  14. [self setHorizScrollerRequired: YES];
  15. [self setVertScrollerRequired: YES];
  16. [self setBorderType: NX_BEZEL];
  17. return self;
  18. }
  19. /*
  20. ================
  21. tile
  22. Adjust the size for the pop up scale menu
  23. =================
  24. */
  25. - tile
  26. {
  27. NXRect scrollerframe;
  28. [super tile];
  29. [hScroller getFrame: &scrollerframe];
  30. [button1 setFrame: &scrollerframe];
  31. scrollerframe.size.width = 0;
  32. [hScroller setFrame: &scrollerframe];
  33. return self;
  34. }
  35. -(BOOL) acceptsFirstResponder
  36. {
  37. return YES;
  38. }
  39. - superviewSizeChanged:(const NXSize *)oldSize
  40. {
  41. [super superviewSizeChanged: oldSize];
  42. [[self docView] newSuperBounds];
  43. return self;
  44. }
  45. @end