VBA Microstation: Paghimo og hugpong nga mapa
Pipila ka adlaw ang milabay akong gipakita unsaon sa pag-umol mga sumbanan alang sa pag-imprinta gamit ang Microstation. Sa wala pa ang kini nga kapilian alang sa pagdumala sa mga sheet ug modelo, kinahanglan nga buhaton kini sa daan nga paagi, pagmugna mga bloke (cells) ug sulud sa pag-clipping.
Balik gikan sa akong minuto sabatikal, ang ehemplo nga akong gipakita kanimo niining panahona usa ka aplikasyon nga gipalambo visual Basic sa Microstation, diin gihimo ang usa ka utlanan nga mapa, o sama sa pagtawag sa pipila ka mga sertipiko nga cadastral. Sulundon alang sa mga departamento sa cadastre, nga kinahanglan maghimo usa ka mapa nga gihangyo, sa sukdanan, usa ka serbisyo diin sila maningil apan kung, kung dili awtomatiko, dugay nga panahon.
Si Ante adunay usa ka video nga temporaryo kong gikuha, apan alang sa mga katuyoan sa pagtuon dinhi akong ibilin ang paagi nga kini gipalambo ug gipahiangay.
Ang mga input.
- Ang usa, nga nalambigit sa lebel sa uma
- Usa ka Access database, nga adunay sulud nga kolum sa lugar, perimeter, ug range coordinate. Pagkahuman usa ka pag-apil sa lain nga database nga adunay mga ngalan sa mga magbubuhis (mga tawo), gikan sa yawi sa cadastral.
- Usa ka .cel file nga adunay sulud nga frame cell (block), gi-scale 1: 100, simbolo sa amihanan, ug mga node alang sa pagdugang data gikan sa database. Kinahanglan ibutang kini sa lugar diin gitipig ang mga narehistro nga librarya (workspace / configure / cell)
Sa VBA usa ka porma sa pagdakup ang gihimo nga adunay usa ka mask format sumala sa cadastral code sa munisipyo nga mogamit niini. Adunay kini usa ka wanang aron makadugang mga obserbasyon ug mga kapilian nga isal-ot ingon anotasyon ang mga ngalan sa mga tag-iya, ang mga yawi sa kadastre o ang numero sa kabtangan lamang.
Giunsa kini gipatuman
Sa higayon nga ang mga kinaiya gitudlo, ang "generate certificate" nga buton gipugos ug ang sistema naghimo sa normal nga mga operasyon nga pagahimoon sa kamut kung ang aplikasyon wala magamit.
Tungod kay gipatuman kini sa usa ka bag-ong file (trabaho), ang sistema naghimo sa mosunod:
- Gipasabut ang siga sa mapa nga adunay sulod nga plot
- Kalkulahin ang gidak-on gikan sa mga coordinate nga naglangkob sa luna, aron sa pag-establisar sa angay nga timbangan
- Dayon paghimo og koral sa palibot sa propiedad, nga ang gidak-on katumbas sa unom ka kabtangan, aron dili magtrabaho sa tibuok nga mapa
- Unya siya naghimo sa usa ka clip nga naglangkob lamang sa gikinahanglan nga mga lut-od, mga utlanan sa propyedad, mga numero sa uma, mga utlanan sa mansanas ug mga ngalan sa kadalanan. Sa niini nga proseso, ang mga operasyon panig-ingnan mao ang panahon-nga nagaut-ut tungod kay ang topological criteria dili maayo ang haum ngadto niini nga mga mapa, sa baylo nga taytayan sa talimútngà nalambigit sa mga utlanan, pagpugos sa paghimo sa usa ka pagbalhin pagbirigbirig ngilit sa talimútngà ug sa kamatuoran ang pagdumala sa usa ka mapa imbes nga mga file sa mga zone o mga quadrante makapahimo sa pag-usisa nga mapuslanon.
- Dayon kalkula ang timbangan, nga naghisgot sa gidak-on sa block (cell) nga sukat 1: 100 aron mahibal-an kung kini nag-okupar nga kini mas dako o mas gamay ug ibutang ang cell.
- Dayon magtukod og usa ka koral sa bayanan kung unsa ang adunay gilakip nga mapa, ug giputol ang sobra.
Ang resulta
Didto aduna kita niini, ang usa ka cadastral certificate, diin data module gisal-ut ang ahensya nga alang sa maong proyekto, ang logo sa lungsod, ang tinuyo nga dapit, scale, dahon gidaghanon ug paghulagway nagpakita.
Sa usa ka ikaduha nga sheet, pagmugna sa lamesa sa mga koordinasyon sa lainlaing mga istasyon, distansya ug mga bearings nga gihimo sa fly gikan sa usa ka internal nga koral sa kabtangan, pagbutang usa ka punto ug usa ka numero sa vertex sa us aka direksyon sa direksyon gikan sa usa nga nakit-an sa kasadpan pa. Kung kinahanglan, tungod kay ang polygon adunay daghang mga vertex, paghimo sa kinahanglan nga mga sheet.
Alang sa grabeng mga kaso, sa mga parsela nga mogawas nga hapit kaayo, kana sa tupad sa usa ka halapad kaayo nga kadalanan, unya gihimo ang mga kapilian aron mapugos ang mosunud nga sukdanan o aron makahimo usa ka sukdanan nga 1: 125 diin gikwenta sa sistema. Ang kaso sa panig-ingnan nanginahanglan pagbuhat niini, tungod kay nakita nila nga ang mga silingan sa pikas nga dalan dili mogawas sa kana nga sukdanan.
Ang aplikasyon magamit sa Microstation Geographics V8, bisan kung sa kadugayan kini ug ang usa ka libo nga uban pa nga mga butang nga nahimo alang sa kana nga proseso nga sa usa ka adlaw gilauman nako ang pagsulti.
Wala kini alang sa pag-download. Apan kung mokontak ka kanamo, mahimo namon kini ipasibo sa imong mga panginahanglan.
editor@geofumadas.com
Mahimo ba nimo akong sultihan kon asa nako mapalit kana nga macro? ug ang cosnto niini palihug? usa ka yakap nga nagpasalamat alang sa atensyon
Sa akong hunahuna usa kini ka labad sa ulo nga gusto nako nga makahimo sa pagbiya sa tukmang bounded map tinuod nga labing maayo nga proseso nga jajajjaja