close
form開始前先設定地圖的大小位置。
void __fastcall TForm1::FormShow(TObject *Sender)
{
Map1->ScrollBars = false;
IMoRectanglePtr rec;
rec = (IDispatch*)CreateOleObject("MapObjects2.Rectangle");
rec->Left=246034;
rec->Right=257148;
rec->Top=2745620;
rec->Bottom=2738197;
Map1->ControlInterface->Extent = rec;
}
全站熱搜