Wir geben Ihnen Hinweise und Tipps, die Ihnen den Einstieg in das Basisprogramm RFEM erleichtern.
[EN] FAQ 004326 | Wie kann man einen Kommentar über die COM-Schnittstelle anlegen?
Video
Erste Schritte mit RFEM
Frage
Wie kann man einen Kommentar über die COM-Schnittstelle anlegen?
Antwort
Das Anlegen eines Kommentars über die COM-Schnittstelle (RS-COM oder RF-COM) erfolgt über die Schnittstelle der Hilfsobjekte IGuideObjects. Im Folgenden ein Beispielprogramm, welches einen Kommentar setzt:Sub test_comment()
' get interface from the opened model and lock the licence/program Dim iModel As RFEM5.IModel3 Set iModel = GetObject(, "RFEM5.Model") iModel.GetApplication.LockLicense
On Error GoTo e Dim iModelData As RFEM5.IModelData2 Set iModelData = iModel.GetModelData Dim iGuiObj As RFEM5.IGuideObjects Set iGuiObj = iModel.GetGuideObjects Dim comm As RFEM5.Comment ' set frame type comm.Frame = CircularFrameType ' set reference object type comm.ObjectType = GeneralObjectType comm.ObjectNo = 1 ' set point if GeneralObjectType is choosen comm.Point.X = 2 comm.Point.Y = 4 comm.Point.Z = 6 ' set offset from reference object comm.Offset.X = 0.5 comm.Offset.Y = 1 comm.Offset.Z = 1.5 comm.Rotation = 1 ' set text of comment comm.Text = "testcomment" ' transfer object to program iGuiObj.PrepareModification iGuiObj.SetComment comm iGuiObj.FinishModification e: If Err.Number <> 0 Then MsgBox Err.description, , Err.Source Set iModelData = Nothing iModel.GetApplication.UnlockLicense Set iModel = Nothing
End Sub
Schlüsselwörter
Dlubal FAQ COM Kommentar Hilfsobjekte Comment GuideObjects Häufig gestellte Frage FAQ zu Dlubal Frage und Antwort zu Dlubal
Links
Schreiben Sie einen Kommentar...
Schreiben Sie einen Kommentar...
- Aufrufe 66x
- Aktualisiert 9. April 2020
Kontakt
Haben Sie Fragen zu unseren Produkten oder brauchen Sie einen Rat zur Auswahl der Produkte zur Bearbeitung Ihrer Projekte? Kontaktieren Sie uns über unseren kostenlosen E-Mail-, Chat- bzw. Forum-Support oder nutzen Sie die häufig gestellten Fragen (FAQs) rund um die Uhr.