AVAX-software.com Forums: elias - Viewing Profile

Jump to content

elias's Profile

Group:
Support
Active Posts:
19 (0.03 per day)
Most Active In:
Avax Vector ActiveX Support (14 posts)
Joined:
24-October 08
Profile Views:
2,334
Last Active:
User is offline Aug 06 2010 10:48 AM
Currently:
Offline
Icon   elias has not set their status

Posts I've Made

  1. In Topic: Big dxf File could not import

    Posted 6 Aug 2010

    Hi,

    Can you zip and attach the dxf file?

    Thank you
  2. In Topic: editing text dxf file

    Posted 28 Jun 2010

    Hi,

    use this code:

        Dim sDxfFile As String
        Dim lTextHandles() As Long, lHandles() As Long
        Dim lMaxHandles As Long, l As Long
        Dim sText As String
        Dim iType() As AvaxItemType, iColor() As Integer, iWidth() As Integer
        Dim iStyle() As Integer, iLayer() As Integer, Elevation3D() As Single, Height3D() As Single
        Dim x As Single, y As Single, z As Single, sFontName As String
        Dim vItemProperties As Variant, sScale As Single, iFontNumber As Integer
        Dim Angle As Single, iNewClr As Integer
        Dim iNewWidth As Integer, iNewStyle As Integer, iNewLayer As Integer
        Dim fBold As Boolean, fItalic As Boolean, fUnderline As Boolean
        Dim fStrikeOut As Boolean, lCharset As Long
        Dim dWidth As Single, dHeight As Single, lTextLines As Long
        
        sDxfFile = "......."
        Call cAvax1.Add_DXF(sDxfFile, "", 0, 0, 0)
        lMaxHandles = cAvax1.GetAllHandlesArr(lTextHandles(), Text_i)
        
        For l = 1 To lMaxHandles
            'To get the text attributes'
            ReDim lHandles(1) As Long
            lHandles(1) = lTextHandles(l)
            Call cAvax1.GetAttributes(lHandles(), iType(), iColor(), iWidth(), iStyle(), iLayer(), Elevation3D(), Height3D())
            sText = cAvax1.GetTextAttributes(lTextHandles(l), sFontName, fBold, fItalic, fUnderline, fStrikeOut, lCharset)
            iFontNumber = cAvax1.GetTextFontNumber(lTextHandles(l))
            Call cAvax1.GetTextGeometry(lTextHandles(l), x, y, dWidth, dHeight, Angle, lTextLines)
            sScale = dHeight / cAvax1.GetAvaxProperty(TextInitHeight_p)
            'To change the text'
            Call cAvax1.DeleteItems(lHandles())
            Call cAvax1.Add_Text(sText, x, y, z, vItemProperties, sScale, iFontNumber, Angle, iNewClr, iNewWidth, iNewStyle, iNewLayer, fBold, fItalic, fUnderline, fStrikeOut, lCharset)
        Next l
    
  3. In Topic: Installation Help

    Posted 3 Jun 2010

    Hi,

    To see Avax in the toolbox follow these steps:
    Go to the toolbox, right click and select "Choose Items...".
    At the COM Componets tab check Avax.cAvax.
    Then you should see Avax in the toolbox.
    You can also download the http://www.avax-soft...avaxcad_net.zip example. It can be useful to you.
  4. In Topic: ContextSwitchDeadLock Was Detected

    Posted 12 Apr 2010

    The problem is fixed. You can download the latest version.

    The problem you report at 'BadImageFormatException' post still exists?
  5. In Topic: SVG import

    Posted 24 Mar 2010

    We have fixed the bug. The missing viewbox was the problem.
    Please download the latest setup.

My Information

Member Title:
Newbie
Age:
Age Unknown
Birthday:
Birthday Unknown
Gender:

Contact Information

E-mail:
Click here to e-mail me