Hallo zusammen und schönes neues Jahr!
Wir haben/hatten in unserem Titleblock zwei "iprop-texte" übereinander, wenn Projekt schreibe dies wenn Artikel schreibe das.
Bisher hatte ich das gelöst dass ich einfach das einte oder andere iprop geleert habe (text "") somit war ein Feld leer im Andern war info.
Nun neu ist dass Vault-Invetor in beide richtungen komuniert (früher nur aus VAULT nach Inventor). Deshalb nun wenn meien ilogic das iprop leer überschreibt wird der datensatz auch in VAULT gelöscht...
Nun habi versucht den Text einfach transparent zu schalten. Dass geht nicht weil RGB kenn kein trasparent. Weiss geht aber ein text liegt immer über dem andernen und schreibt dann weiss in den andern Text rein... Dann ausschalten über oTBox.Enabled = False oder oTBox.visible = False dass kennt nur VBA aber nicht ilogic...
Jemand noch ne idee? In AutoCAD könnte ich die Zeichnereinfolge ändern... dass scheints aber auch nicht zu geben...
Auf nen extra layer werfen geht. aber i möchte nicht wegen einm Textfeld nen neuen Layer anlegen...
Code:
Dim oDoc As Document
oDoc = ThisApplication.ActiveDocumentDim oSheet As Sheet
oSheet = oDoc.ActiveSheet
Dim oTB As TitleBlock
oTB = oSheet.TitleBlock
Dim oTBD As TitleBlockDefinition
oTBD = oTB.Definition
Dim oSketch As DrawingSketch
Dim oColor1 As Color = ThisApplication.TransientObjects.CreateColor(255, 255, 255)
Dim oColor2 As Color = ThisApplication.TransientObjects.CreateColor(0, 0, 0)
oTBD.Edit(oSketch)
Dim oTBox, oLTBox, oSTBox As Inventor.TextBox
If iProperties.Value("Custom", "REY Project Department Team") = "Projects" Then
For Each oTBox In oSketch.TextBoxes
If oTBox.Text = "<REY Project ID> <REY Project Description>" Then
oTBox.Color = oColor1
ElseIf oTBox.Text = "<REY BF Linked System>" Then
oTBox.Color = oColor2
End If
Next
Else
For Each oTBox In oSketch.TextBoxes
If oTBox.Text = "<REY Project ID> <REY Project Description>" Then
oTBox.Color = oColor2
ElseIf oTBox.Text = "<REY BF Linked System>" Then
oTBox.Color = oColor1
End If
Next
End If
oTBD.ExitEdit(True)
Gruss nebu
------------------
Es ist kein Zeichen geistiger Gesundheit, gut angepasst an eine zutiefst kranke Gesellschaft zu sein.
Jiddu Krishnamurti
[Diese Nachricht wurde von nebuCADnezzar am 10. Jan. 2024 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Foren auf CAD.de (alle Foren)
| 
