1. Menampilkan Peta

Oktober 6, 2008
  • Tambahkan statement Imports MapInfo.Mapping sebelum nama Class Form
  • Tambahkan MapControl pada form (nama MapControl adalah MapControl1 secara default)
  • Tambahkan Maptoolbar pada from dan set property MapControl pada MapToolBar à MapControl1
  • Tambahkan event form load pada form
  • Buat Path Direktori tempat dimana peta berada

        Dim PathPeta As String

        PathPeta = “C:\LatihanMapXtreme2005\Peta\”

  • Tentukan nama peta yang akan ditampilkan

        Dim NamaPeta As String

        NamaPeta = “Indonesia.tab”

  • Buat sebuah MapTableLoader untuk menampilkan peta pada MapControl dan masukan variable path direktori serta nama peta yang akan ditampilkan

        Dim LoadPeta As New MapTableLoader(PathPeta & NamaPeta)

  • Load peta ke MapControl

        MapControl1.Map.Load(LoadPeta)


Ikuti

Get every new post delivered to your Inbox.