Ví dụ đưa một lớp dữ liệu vào bản đồ
myView=av.GetProject.FindDoc(“bản đồ”) ‘ tìm khung nhìn có tên “bản đồ”
theSrcName=SrcName.Make(“D:\dulieu\hchinh.shp”)
‘ D: \dulieu\hchinh.shp là vị trí tệp tin dữ liệu dạng shapefile
if (theSrcName=nil) then
Msgbox.Info(“Không tồn tại tệp tin”, “Thông báo”)
exit
end
theTheme = Theme.Make(theSrcName) ‘ tạo lớp dữ liệu
myView.AddTheme(theTheme) ‘ đưa dữ liệu vào khung nhìn
theTheme.SetVisible (true) ‘ cho hiển thị lên bản đồ
Tài liệu tham khảo: Giáo trình lập trình GIS - Lê Đức Trị
|