VBA Microstation: Sukurkite išmatavusį žemėlapį

Prieš kelias dienas jis parodė, kaip kurti Spausdinkite maketus naudojant „Microstation“. Prieš egzistuojant šią lapų ir modelių tvarkymo galimybę, reikėjo tai padaryti senuoju būdu, generuojant blokus (langelius) ir iškarpant turinį.

Atgal nuo mano minutės Sabbatical, Pavyzdys, kurį jums parodysiu šiuo atveju, yra sukurta programa "Visual Basic" de „Microstation“, kuriame sukuriamas ribotas žemėlapis, arba kaip kai kurie kadastro pažymėjimai tai vadina. Idealiai tinka kadastro skyriams, kurie pagal pareikalavimą turi sugeneruoti žemėlapį - paslaugą, už kurią ima mokestį, bet kuri, jei ne automatizuota, užtrunka ilgai.

Ante turėjau vaizdo įrašą, kurį laikinai išleidžiau, tačiau čia švietimo tikslais aš palieku tai, kaip jis buvo sukurtas ir pritaikytas.

Įėjimai.

• Dgn, susijęs ūkio lygiu
• „Access“ duomenų bazė, kurioje buvo ploto stulpelis, perimetras ir diapazono koordinatės. Tada prisijungimas prie kitos duomenų bazės, turinčios mokesčių mokėtojų (žmonių) vardus, nuo kadastro rakto.
• .Cel failas, kuriame yra rėmelio langelis (blokas), mastelio dydis 1: 100, šiaurės simbolis ir mazgai duomenims iš duomenų bazės pridėti. Tai turi būti vieta, kur saugomos registruotos bibliotekos (darbo sritis / konfigūracija / langelis)

VBA buvo užfiksuota forma su kaukės formatu pagal savivaldybės, kuri ketino ją naudoti, kadastro kodą. Joje yra vietos pridėti pastebėjimus ir parinktis, kurias reikia įterpti kaip Anotacijos Savininkų vardai, kadastriniai raktai arba tik nuosavybės numeris.

Kaip paleisti.

Nustačius charakteristikas, paspaudžiamas mygtukas "generuoti sertifikatą", o sistema atlieka įprastas operacijas, kurios būtų atliekamos rankiniu būdu, jei neturės programos.

Kadangi jis vykdomas naudojant naują failą (darbą), sistema atlieka šiuos veiksmus:

• Referencinis žemėlapis nurodo susietą žemėlapį, kuriame yra sklypas
• Apskaičiuokite diapazoną nuo koordinačių, kuriose yra sklypas, kad nustatytumėte tinkamą skalę
• Tada sukurkite tvorą aplink turtą, kurio dydis atitinka šešias dalis, taigi jums nereikia dirbti su visu žemėlapiu
• Tada atlikite a klipas Kuriuose yra tik būtini sluoksniai, pastato ribos, pastatų numeriai, blokų ribos ir gatvių pavadinimai. Šiame procese, operacija pavyzdys yra laiko, nes topologines kriterijai nėra gerai tinka prie šių žemėlapių, o susiejimo centroidas susijęs ribas, verčia atlikti pervedimą Flirtas krašto į centroidė ir tai, Vieno žemėlapio, o ne zonos ar kvadranto failų valdymas, apsunkina analizę.
• Tada ji apskaičiuoja skalę, nurodydama bloko (skalės) dydį 1: 100, kad žinotumėte, ar jis užimtas didesniam ar mažesnio dydžio, ir talpina langelį.
• Tuomet jis generuoja tvorą riboto žemėlapio rėmuose ir perpjauna perteklių.

Rezultatas.

Čia mes turime tai, kadastrinis pažymėjimas, kurio modulyje buvo įterpiami duomenys, tokie kaip projekto vykdytojas, savivaldybės logotipas, apskaičiuotas plotas, skalė, lapo numeris ir apibūdinimas, kurį mes nurodome.

Ant antrojo lapo sugeneruokite skirtingų stočių, atstumų ir guolių, kurie buvo sukurti skrendant iš vidinės tvoros nuosavybėje, koordinačių lentelę, padedant tašką ir viršūnių skaičių pagal laikrodžio rodyklę nuo vietos, kurioje jis yra toliau į vakarus. Jei reikia, nes daugiakampyje yra daug viršūnių, sugeneruokite reikiamus lapus.

Kraštutiniais atvejais siuntų, kurios išeina per arti, yra šalia labai plačios gatvės, tada buvo sukurtos parinktys priversti šią skalę arba sugeneruoti skalę 1: 125, kurią sistema apskaičiavo. Pagal pavyzdį reikia tai padaryti, nes jie mato, kad kitoje gatvės pusėje esantys kaimynai tokiu masteliu neišlenda.

Taikomoji programa veikia „Microstation Geographics V8“, nors laikui bėgant šis procesas ir tūkstantis kitų dalykų buvo atlikti tam procesui, kurį vieną dieną tikiuosi kalbėti.