Показать сообщение отдельно
  #2  
Старый 05.07.2010, 23:16
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,105
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Код:
K := 600/2000;
X6 := X2 * K;
Y6 := Y2 *K;
X6 - коорд. в карте 600х600
Х2 - коорд. в карте 2000х2000
Ответить с цитированием