Paste number 56333: NSSlider mouseUp handling

Paste number 56333: NSSlider mouseUp handling
Pasted by: vade
When:1 year, 4 months ago
Share:Tweet this! | http://paste.lisp.org/+17GT
Channel:#macdev
Paste contents:
Raw Source | XML | Display As

@implementation v001GUISLider
- (void) mouseDown:(NSEvent *)event
{
	NSLog(@"Slider gets mouseDown");
	[movie stopMovie];
	
	[super mouseDown:event];
	
	// set up our mouseUp event. 
	NSEvent* upEvent = [NSEvent mouseEventWithType:NSLeftMouseUp
										location:[event locationInWindow] 
								   modifierFlags:[event modifierFlags]
									   timestamp:[event timestamp]
									windowNumber:[event windowNumber]
										 context:[NSGraphicsContext currentContext] 
								     eventNumber:[event eventNumber]
									  clickCount:[event clickCount]
									    pressure:1.0
										];
	// dispatch mouse-up event
	[NSApp sendEvent:upEvent];
}

- (void) mouseUp:(NSEvent *)event
{
//	[super mouseUp:event];
	[movie startMovie];
	NSLog(@"Slider gets mouseUp");
}


@end

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.