VBA Microstation: Генериране на ограничена карта

Преди няколко дни показах как да генерирам оформления за отпечатване с помощта на Microstation. Преди да има тази опция за работа с листове и модели, беше необходимо да се направи по стария начин, като се генерират блокове (клетки) и се изрязва съдържание.

Обратно от моята минута отпуск, този пример, който ви показвам този път, е приложение, разработено на Visual Basic Микростанция, в която се генерира ограничена карта или както я наричат ​​някои кадастрални сертификати. Идеален за кадастрови отдели, които трябва да генерират карта при поискване, в мащаб, услуга, за която те таксуват, но която, ако не бъде автоматизирана, отнема много време.

Ante имаше видеоклип, който временно премахнах, но за образователни цели тук оставям начина, по който е разработен и персонализиран.

Входовете.

• A dgn, свързани на ниво ферма
• База данни на Access, която съдържа колоната на областта, периметъра и координатите на обхвата. След това присъединяване към друга база данни, съдържаща имената на данъкоплатците (хората), от кадастралния ключ.
• Файл .cel, съдържащ рамковата клетка (блок), мащабиран 1: 100, северния символ и възлите за обединяване на данни от базата данни. Това трябва да се постави на мястото, където се съхраняват регистрираните библиотеки (работно пространство / конфигурация / клетка)

Във VBA беше направен формуляр за заснемане с формат на маска съгласно кадастралния код на общината, която щеше да го използва. Той има място за добавяне на наблюдения и опции, които да бъдат вмъкнати като анотации имената на собствениците, кадастралните ключове или номера на имота само.

Как се изпълнява

След като са били определени характеристиките, бутонът "генериране на сертификат" е натиснат и системата извършва нормални операции, които ще се извършват ръчно, ако приложението не е налице.

Тъй като работи върху нов файл (работа), системата прави следното:

• Референтен пламък свързаната карта, която съдържа сюжета
• Изчислете диапазона от координатите, които съдържат графиката, за да установите съответната скала
• След това създайте ограда около имота с размер, еквивалентен на шест свойства, така че да не се налага да работите с цялата карта
• Тогава той прави клипс който съдържа само необходимите слоеве, границите на собствеността, номерата на стопанствата, границите на ябълките и имената на улиците. В този процес, примера с операция отнема време, тъй като топологични критерии не са много подходящи за тези карти, вместо свързване центърът на тежестта, свързана границите, принуждавайки да извърши трансфер флирт ръб до центърът на тежестта и на факта, управлението на една карта, вместо на файловете с зони или квадранти, прави анализа тромава.
• След това изчислете скалата, като направите справка за размера на блоковата (клетъчна) скала 1: 100, за да разберете дали тя заема, като го прави по-голям или по-малък и поставя клетката.
• След това генерирайте ограда в рамките на това, което съдържа ограничената карта, и намалете излишъка.

Резултатът

Там го има, сертификат за кадастрални, в който модул данни се добавя като отговорна агенция за проекта, логото на общината, района на изчислението, мащаба, брой листа и описание посочи.

На втори лист генерирайте таблицата с координати на различните станции, разстояния и лагери, които са генерирани в движение от вътрешна ограда на имота, поставяйки точка и брой върхове по посока на часовниковата стрелка от намерената по-на запад. Ако е необходимо, тъй като многоъгълникът има много върхове, генерирайте необходимите листове.

За екстремни случаи, на парцели, които отиват твърде близо, които са в непосредствена близост до много широка улица, тогава бяха създадени опциите за налагане на следния мащаб или генериране на мащаб 1: 125, от който системата изчислява. Случаят с примера изисква да се направи това, тъй като те виждат, че съседите от другата страна на улицата не излизат в такъв мащаб.

Приложението работи на Microstation Geographics V8, въпреки че с течение на времето това беше направено и хиляди други неща за този процес, които един ден се надявам да говоря.