Control caret by dragging on Keyboard

gistfile1.txt

- (void)keyboardWillShow:(NSNotification *)notification
{
	NSArray *appWindows = [[UIApplication sharedApplication] windows];
	
	UIWindow *keyboardWindow = [appWindows lastObject];
	UIView *keyboardView = [keyboardWindow.subviews objectAtIndex:0];
	keyboardView = [keyboardView.subviews objectAtIndex:0];
	keyboardView = [keyboardView.subviews objectAtIndex:0];
	keyboardView = [keyboardView.subviews objectAtIndex:0];
	
	UIPanGestureRecognizer *pan = [[UIPanGestureRecognizer alloc] initWithTarget:self action:@selector(pan:)];

	[keyboardView addGestureRecognizer:pan];
}

- (void)pan:(UIPanGestureRecognizer *)gesture
{
	if (gesture.state == UIGestureRecognizerStateBegan)
	{
		dragStartPosition = textView.selectedTextRange.start;
		dragStartCaretRect = [textView caretRectForPosition:dragStartPosition];
		dragStartPoint = CGPointMake(CGRectGetMidX(dragStartCaretRect), CGRectGetMidY(dragStartCaretRect));
	}
	else if (gesture.state == UIGestureRecognizerStateChanged)
	{
		//CGPoint location = [gesture locationInView:textView];
		CGPoint offset = [gesture translationInView:textView];
		
		CGPoint newLocation = dragStartPoint;
		newLocation.x += offset.x;
		newLocation.y += offset.y;
		
		UITextPosition *position = [textView closestPositionToPoint:newLocation];
		
		textView.selectedTextRange = [textView textRangeFromPosition:position toPosition:position];
	}
}