405x
004691
2020-09-01

Domanda

Come posso creare visibilità tramite l'interfaccia COM?


Risposta:

Le visibilità possono essere create utilizzando le interfacce RF‑COM 3/RS‑COM 6 mentre si utilizza l'interfaccia IrfView. Gli elementi che dovrebbero appartenere alla visibilità possono essere selezionati con la funzione rfSelectObjects:

Sottoinsieme_visibilità()
' get interface from the opened model and lock the licence/program
Dim iModel As RFEM3.IrfStructure3
Imposta iModello = GetObject(, "RFEM3.Struttura")
iModel.rfGetApplication.rfLockLicence

On Error GoTo e

' ottieni l'interfaccia per i dati del modello
Dim iModdata As RFEM3.IrfStructuralData4
Imposta iModdata = iModel.rfGetStructuralData

iModdata.rfSelectObjects STR_MEMBER, "1-2"
iModdata.rfSelectObjects STR_SURFACE, "6,14,17"

' ottieni l'interfaccia per la visualizzazione
Dim iView come RFEM3.IrfView2
Imposta iView = iModel.rfGetActiveView
   
iView.rfSetPartialView "prova|vista"

' seleziona vista parziale
iView.rfSelectPartialView "test|view", PVM_SHOW, True, True


e: If Err.Number <> 0 Then MsgBox Err.description, , Err.Source

iModel.rfGetApplication.rfUnlockLicence
Imposta iModel = Niente

End Sub

Nell'esempio, Superficie 6, Superficie 14 e Superficie 17 sono selezionate insieme all'asta 1 e all'asta 2. Quindi, la visibilità di questi elementi viene creata e denominata "vista". La visibilità "vista" si trova nel gruppo "test". Viene creato con il delimitatore "|". Dopo aver creato la visibilità, questa è ancora selezionata o visualizzata; in questo caso, PVM_SHOW è del tipo "RF_PARTIAL_VIEW_MODE", che può anche rimuovere la visibilità. La funzione può anche specificare se gli elementi devono essere visualizzati in background.