Sub SetLayoutAnimatedLinear(View As View, Duration As Int, Dumping As Float, Left As Float, Top As Float, Width As Float, Height As Float)
Dim no As NativeObject = Me
no.RunMethod("SetLayoutAnimated::::::", Array(View, Duration, Left, Top, Width, Height))
End Sub
#if OBJC
- (void)SetLayoutAnimated:(UIView*)v: (int)DurationMS :(float)Left :(float)Top :(float) Width :(float)Height {
void (^setlayout)() = ^{
v.bounds = CGRectMake(0, 0, Width, Height);
v.center = CGPointMake(Left + Width / 2, Top + Height / 2);
};
[UIView animateWithDuration:DurationMS / 1000.0 delay:0 options:UIViewAnimationOptionCurveLinear
animations:setlayout completion:nil];
}
#End If