.NET

.NET

Reply
Valued Mentor
409 Posts
28 Kudos
Registered: ‎01-27-2010
Post 1 of 2

How to check and manage Unit for insert a BlockReference

162 Views, 1 Replies
02-26-2012 10:38 AM

Hi all i have a VBA code for check and choose unit but how i can in .NET ?

    Unite = ThisDrawing.GetVariable("INSUNITS")
    Select Case Unite
      Case 4: Unite = 10 'mm
      Case 5: Unite = 1   'cm
      Case 6: Unite = 0.01   'm
      Case Else: Unite = 1
    End Select

 i dont find help for this..

db.UnitMode is always = 0

i have try this :

Dim BlocT As BlockTable
        Dim tr As Transaction = db.TransactionManager.StartTransaction
        BlocT = tr.GetObject(db.BlockTableId, OpenMode.ForRead)
        Dim Bloc As BlockTableRecord
        Bloc = tr.GetObject(BlocT(BlockTableRecord.ModelSpace), OpenMode.ForRead)
        Dim lay As Layout = tr.GetObject(Bloc.LayoutId, OpenMode.ForRead)
        tr.Commit()
        tr.Dispose()

 but bloc.units dont egal the unit command in autocad.

I can use  :

Dim obj As Object = Application.GetSystemVariable("INSUNITS")

but i want a proper solution with .net.

 

anyone can help ?

Moderator
1,465 Posts
277 Kudos
Registered: ‎04-09-2008
Post 2 of 2

Re: How to check and manage Unit for insert a BlockReference

02-26-2012 11:45 AM in reply to: AubelecBE

Database.Insunits ?


Пожалуйста не забывайте про Утвердить в качестве решения! Утвердить в качестве решения и Give Kudos!Баллы
Please remember to Accept Solution! Accept as Solution and Give Kudos!Kudos

Post to the Community

Have questions about Autodesk products? Ask the community.

New Post