Product : Engine, Version : 5.0.1.1035, ArticleID : 41023836

HowTo : DisableXRefLoad wish.

Article41023836
TypeHowTo
ProductEngine
Version5.0.1.1035
Date Added1/20/2005
Submitted byDuvenbeck Christof
Keywords

Subject

DisableXRefLoad wish.

Summary

And my wish -> the DisableXRefLoad - flag <- would help us to solve our performance problem.

Solution

This wish "DisableXRefLoad" is already built-in. Try this type of code :
Private Sub VDPro1_AddEntity(ByVal entity As VDProLib5.vdPrimary, Cancel As Integer)
    Dim blk As vdBlock
    If entity.Type = "VDBLOCK" Then
        Set blk = entity
        If blk.XrefFlag = XrefON Then blk.XrefFlag = XrefOFF
       
' also store here the blk handles to an array, so you can use
        ' code before saving this file to set the the xrefFlag back to XrefO
N
    End If
    ' MsgBox VDPro1.ActiveDocument.Entities.Count
End Sub