Sub NumberFormat3(num As Double, groupSeparator As String, decimalSeparator As String, maxFractions As Int) As String
Dim no As NativeObject = Me
Dim objRes As Object = no.RunMethod("NumberFormat3::::",Array(num,groupSeparator,decimalSeparator,maxFractions))
Dim res As String = objRes ' Will cast it directly to String
Return res
End Sub
#if OBJC
// From: https://stackoverflow.com/questions/10103270/how-to-use-thousand-separator-in-nsstring
-(NSString*)NumberFormat3: (double)num : (NSString*)groupSeparator :(NSString*)decimalSeparator :(int)numFractionDigits {
NSNumberFormatter *numberFormatter = [[NSNumberFormatter alloc] init];
//[numberFormatter setGroupingSeparator:@","];
[numberFormatter setGroupingSeparator:groupSeparator];
[numberFormatter setGroupingSize:3];
[numberFormatter setUsesGroupingSeparator:YES];
[numberFormatter setDecimalSeparator:decimalSeparator];
[numberFormatter setNumberStyle:NSNumberFormatterDecimalStyle];
[numberFormatter setMaximumFractionDigits:numFractionDigits];//2
NSString *theString = [numberFormatter stringFromNumber:[NSNumber numberWithDouble:num]];
return theString;
}
#End If