Здравствуйте господа разработчики !
Вопрос
Как использовать вот эту функцию, а точнее выделенный параметр в задаче PANTASK в ГИС Операторе
Простыми словами, мне нужно поверх карты нарисовать полупрозрачный площадной объект
Вопрос
Как использовать вот эту функцию, а точнее выделенный параметр в задаче PANTASK в ГИС Операторе
Цитата |
---|
_MAPIMP long int _MAPAPI mapPaintMapObject95Ex(HMAP hMap, HDC hdc, RECT *rect, PAINTPARM *image, HOBJ object, long int alpha); |
Код |
---|
В классической задаче в ОС Windows это делается вот так // =========================================================== // Создать объект "окно электронной карты" // =========================================================== constructor TPanWindow.CreatePanWindow(aPanTask : TObject; hwmap : HWND; aparm : TTASKPARM); begin inherited Create(); FHMap := 0; FHMainWindow := 0; FHMapWindow := 0; FHMapDoc := 0; FPanTask := nil; ....... FCanvas := TCanvas.Create; FCanvas.Handle := GetDC(hwmap); end; // =========================================================== // Удалить объект "окно электронной карты" // =========================================================== destructor TPanWindow.Destroy; begin if Assigned(FCanvas) then begin ReleaseDC(FHMapWindow, FCanvas.Handle); FCanvas.Free; FCanvas := nil; end; inherited; end; int TPanAction::Paint(THDC& dc, bool erase, TRECT& rect) { if (vObjRte == 0) return 0; mapPaintMapObject95Ex(HMap, MapWindow->FCanvas.Handle, rect, img, hobj, 50); return 1; } |
Изменено: KFF - 21.02.2019 13:56:12
Не тот глуп кто не знает, а тот, кто не знает где искать.