[QUOTE]
Andrey Gheleznyakov написал:
[URL=jav * ascript:void(0);]Загрузить файлы[/URL]росьба подсказать значения пары координат, для которых неправильно выполняется пересчет.
[/QUOTE]
Андрей Владиславович, а зачем Вам эти пары если у него
[QUOTE]procedure TfrmTestMap.mvMapMouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
var
Point: TDOUBLEPOINT;
Height : double;
gradus : array[0..32] of char;
begin
Point.X := mvMap.MapLeft + X;
Point.Y := mvMap.MapTop + Y;
mvMap.ConvertMetric(Point.X,Point.Y,[B]PP_PICTURE[/B][B],PP_GEO[/B]);
/// экранные ==> радианы FillChar(gradus[0], 32, 0);
map[B]PlaneTo[/B]PointFormatString(mvMap.MapHandle, Point.X, Point.Y, Height, gradus, 32); ///
[B]радианы берутся как метры[/B] и переводяться в ===> строку
sbStatus.Panels[0].Text := Trim(gradus);
end; [/QUOTE]
Естественно у человека получится геодезия соответствующая 0,0 проекции карты , как правило осевой и параллель главной (средней) точки
+ и вообще, функция очень странно описана
[QUOTE]//
[B]Пересчитать значение координат из [U]плоских прямоугольных[/U] координат[/B] документа (метры)
// в систему, определяемую форматом отображения текущих координат
// и сформировать строку
// hmap - идентификатор открытых данных
// x, y -[B]
координаты точки в [U]
радианах [/U][/B]в соответствии с текущими параметрами
// проекции (mapGetDocProjection)
// h - высота точки (указатель может быть равен нулю)
// place - адрес строки для записи результата
// size - размер выделеной строки (не менее 256 байт)
// Пример строки:
// B= -73° 27' 04.53" L= 175° 51' 21.07" H= 109.51 m (WGS84)
// X= 6 309 212.12 м Y= 7 412 249.25 м (СК42)
// При ошибке возвращает ноль[/QUOTE]
Это как ? :|