view rotation

Hi,

I want to set the default "step" in the dialog to 90°
now it is 1°
what can I add to the key-in to make the step 90

OBD  10.10.01.151

Parents
  • Unfortunately there does not appear to be any options to defined this option within the View Rotation dialog with this keyin.

    I have recorded a macro and can see that you may need to define it using VB code.

    Sub BmrViewRotation90()
        Dim startPoint As Point3d
        Dim point As Point3d, point2 As Point3d
        Dim lngTemp As Long
        Dim oMessage As CadInputMessage
    
    '   Send a keyin that can be a command string
        CadInputQueue.SendKeyin "dialog viewrotation"
    
    '   Set a variable associated with a dialog box
        SetCExpressionValue "msDialogState.viewRotationP->increment", 90, "MGDSHOOK"
        CommandState.StartDefaultCommand
    End Sub

    Regards
    Andrew Bell
    Technical Support
    Bentley Systems

Reply
  • Unfortunately there does not appear to be any options to defined this option within the View Rotation dialog with this keyin.

    I have recorded a macro and can see that you may need to define it using VB code.

    Sub BmrViewRotation90()
        Dim startPoint As Point3d
        Dim point As Point3d, point2 As Point3d
        Dim lngTemp As Long
        Dim oMessage As CadInputMessage
    
    '   Send a keyin that can be a command string
        CadInputQueue.SendKeyin "dialog viewrotation"
    
    '   Set a variable associated with a dialog box
        SetCExpressionValue "msDialogState.viewRotationP->increment", 90, "MGDSHOOK"
        CommandState.StartDefaultCommand
    End Sub

    Regards
    Andrew Bell
    Technical Support
    Bentley Systems

Children
No Data