VBA Microstation: Genereer begrensde kaart

Enkele dagen geleden bleek hoe te genereren print layouts met behulp van Microstation. Voordat er deze optie was voor het omgaan met bladen en modellen, was het nodig om het op de oude manier te doen, blokken (cellen) genereren en inhoud knippen.

Terug vanaf mijn minuut sabbatsjaar, het voorbeeld dat ik u laat zien bij deze gelegenheid is een applicatie ontwikkeld Visual Basic Microstation, waarin een begrensde kaart wordt gegenereerd, of zoals sommige kadastrale certificaten het noemen. Ideaal voor kadasterafdelingen, die op verzoek een kaart op schaal moeten genereren, een dienst waarvoor ze kosten in rekening brengen, maar die, zo niet geautomatiseerd, veel tijd in beslag neemt.

Ante heeft een video die ik tijdelijk heb verwijderd, maar voor educatieve doeleinden laat ik de manier waarop het werd ontwikkeld en aangepast.

De ingangen.

• Een dgn, gekoppeld op boereniveau
• Een Access-database met de coördinaten van de gebiedskolom, omtrek en bereik. Vervolgens een verbinding maken met een andere database met de namen van de belastingbetalers (mensen), vanuit de kadastrale sleutel.
• Een .cel-bestand met de framecel (blok), geschaald 1: 100, noordsymbool en knooppunten voor het toevoegen van gegevens uit de database. Dit moet op de plaats staan ​​waar de geregistreerde bibliotheken zijn opgeslagen (werkruimte / configuratie / cel)

In de VBA is een invangformulier gemaakt met een maskerformaat volgens de kadastrale code van de gemeente die het gaat gebruiken. Het heeft een ruimte om waarnemingen toe te voegen en opties die kunnen worden ingevoegd als annotaties de namen van de eigenaars, de cadastrale sleutels of het eigendomsnummer alleen.

Hoe te rennen.

Zodra de kenmerken zijn aangewezen, wordt de knop 'generatie certificaat' ingedrukt en wordt het systeem handmatig uitgevoerd als het niet de toepassing zou hebben.

Aangezien het op een nieuw bestand (werk) wordt uitgevoerd, doet het systeem het volgende:

• Referentiekaart verwijst naar de gebonden kaart die het plot bevat
• Bereken het bereik van de coördinaten die de grafiek bevatten, om de juiste schaal te bepalen
• Maak dan een hek rond het object, met de grootte die overeenkomt met zes partijen, zodat u niet hoeft te werken met de gehele kaart
• Dan maakt hij een klem die alleen de nodige lagen bevat, bouwgrenzen, bouwnummers, grenzen van blokken en straatnamen. In dit proces wordt de operatie met het voorbeeld vertraagd, omdat de topologische criteria in deze kaarten niet erg voldoende zijn, in plaats van de centroid te beperken die de grenzen begrensd heeft, waardoor er een overdracht van de grens tussen de grens en de kern moet worden overgedragen het beheer van een enkele kaart in plaats van zone- of kwadrantbestanden maakt de analyse omslachtig.
• Vervolgens berekent het de schaal, met een verwijzing naar de grootte van het blok (schaal) 1: 100 om te weten of het groter of kleiner is en de cel plaatst.
• Vervolgens een hek in het kader van wat de begrensde kaart bevat, en snijd het overschot.

Het resultaat.

Daar hebben we het, een cadastrale certificaat, in welke module gegevens zijn geplaatst zoals de uitvoerende instelling van het project, het logo van de gemeente, het berekende gebied, de schaal, bladnummer en de omschrijving die we aanwijzen.

Genereer op een tweede blad de tabel met coördinaten van de verschillende stations, afstanden en peilingen die tijdens de vlucht zijn gegenereerd vanaf een interne afrastering op het terrein, door een punt en een hoekpuntnummer met de klok mee te plaatsen vanaf waar het zich bevindt verder naar het westen. Genereer indien nodig, omdat de polygoon veel hoekpunten heeft, de benodigde bladen.

Voor extreme gevallen, van pakketten die te dichtbij komen, die naast een zeer brede straat liggen, zijn de opties gecreëerd om de volgende schaal te forceren of een schaal 1: 125 te genereren waaruit het systeem rekende. De casus van het voorbeeld vereist dit, omdat ze zien dat de buren aan de overkant van de straat niet op die schaal uitkomen.

De applicatie werkt op Microstation Geographics V8, hoewel dit in de loop van de tijd is gedaan en duizend andere dingen voor dat proces die ik op een dag hoop te spreken.