Преобразовать точку с вещественными координатами в строку с заданным разделителем
function DoublePointToString(aPoint: TDoublePoint;
ACoordSeparator: Char = ','; ADecSeparator: Char = '.';
AFormat: TFloatFormat = ffGeneral; APrecision: Integer = 10;
ADigits: Integer = 6): string;