Это должно преобразовать Массив PointF в Point:
result.DrawPolyline(Array.ConvertAll(Of PointF, Point)(pts, Function(p) Point.Round(p)), True, New Bgr(Color.Red), 5)
Вам необходимо передать PointF
в Point.Round .
Проверено с:
Dim pts As PointF() = {New PointF(123.23, 12345.23)}
Dim r = Array.ConvertAll(Of PointF, Point)(
pts,
Function(p) Point.Round(p))
Это также сработало бы, если бы вы передали делегата Point.Round
, как сказал @Jon:
Dim pts As PointF() = {New PointF(123.23, 12345.23)}
Dim r = Array.ConvertAll(Of PointF, Point)(
pts,
AddressOf Point.Round)