level override colors off

Win 7 V8i, I have searched found the following but do not seem to understand

ActiveDesignFile.levels("Kerb Invert").UsingOverrideColor=False

And make sure you update the design file with:

ActiveDesignFile.RewriteLevels

Same thing with .UsingOverrideLineStyle and .UsingOverrideLineWeight

Remember that you will only see the effects of an override colour if you have 'Level Overrides' on in Microstation. That can also be changed using code (see the .DisplayLevelSymbology property) .

There is a fair bit of help in the Microstation VBA Help file.

I tried using the VBA record feature , did not work after the record.

All I want to do is opent the level Manager go to overide select all and then turn off. I can do it manually but have to do it very oftern when working on changes to older .dgn files and the overrides mess up changes wanted by my boss. He has specific colors and weights and so on The script files I have 

Example: 

lv=7
co=6
lc=0
wt=1
' active symbology bylevel
m,ms Level 7, 0,7,1 Orange

will not work because the overrides block the color, after reading the above I tried more key-in, could not discover with Levels or Levelmanager how to just simply turn off the override color

I looked in some books my great friend Lorys recommended, did not find Level Override when searching the .pdf books. Part of my probllem is failure to ask the question correct when searching. I also looked in the F1 help which had Level symbology and override properties about printing.  Hope this will help someone help me find the answer

Parents
  • Part of my probllem is failure to ask the question correct when searching

    Well, we all have that problem!  Particularly when investigating the dustier corners of MicroStation.

    I suggest that you post your question about level overrides to the MicroStation Forum.  Only when you're satisfied with the answer from the MicroStation gurus should you consider writing a VBA macro.

    ActiveDesignFile.levels("Kerb Invert").UsingOverrideColor=False

    And make sure you update the design file with:

    ActiveDesignFile.RewriteLevels

    When you write VBA, you have a much more detailed view of the innards of MicroStation than as a normal user.  When you change a setting programmatically, usually you must save that change for it to persist.  In the case you cite, MicroStation's level table has changed, and ActiveDesignFile.RewriteLevels ensures that the change will be there the next time you open that DGN file.

     
    Regards, Jon Summers
    LA Solutions

  • Thank you Jan, will follow up on this and then reply. Thanks to the VBA record feature I do have a number of routines and all the past tech support from the gurus. I tried the record on the question at hand but never worked. So appreciate folks like you and Lorys who help me so much

    Version: MicroStation V8i SS 10

    RJB Phillips III (Richard) Praise the Lord for His Mercy and grace in Christ Jesus

Reply Children