Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
palich
Зарегистрирован: 21.08.2007 Сообщения: 6
|
Добавлено: Пт Авг 31, 2007 1:19 pm Заголовок сообщения: Определение координат курсора |
|
|
Я хочу чтоб в окне отображались кординаты курсора мышки, в координатах точки карты над которой он находится. Как правильно перевести координаты в пикселях в координаты карты????
Для этого наверно есть функции, ведь вручную выравнивать по моштабу и взависимости от увиличения и сдвига видимой области очень некрасиво. |
|
Вернуться к началу |
|
|
Лена*
Зарегистрирован: 14.08.2006 Сообщения: 16
|
Добавлено: Пт Сен 07, 2007 10:32 am Заголовок сообщения: |
|
|
void __fastcall TForm1::Map1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
CMapXPoint *pt;
pt = Map1->ConvertCoordP(OleVariant(X),OleVariant(Y),miMapToScreen);
Form1->StatusBar1->Panels->Items[1]->Text = "X: " + String(pt->X) + " Y: "+ String(pt->Y);
} |
|
Вернуться к началу |
|
|
palich
Зарегистрирован: 21.08.2007 Сообщения: 6
|
Добавлено: Пт Сен 07, 2007 5:19 pm Заголовок сообщения: |
|
|
Лена* писал(а): |
void __fastcall TForm1::Map1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
CMapXPoint *pt;
pt = Map1->ConvertCoordP(OleVariant(X),OleVariant(Y),miMapToScreen);
Form1->StatusBar1->Panels->Items[1]->Text = "X: " + String(pt->X) + " Y: "+ String(pt->Y);
} |
Большое спасибо |
|
Вернуться к началу |
|
|
|