adding line to script
adding line to script
(OP)
Hi everyone,
CATIA user here. You'll have to excuse my lack of knowledge for script writing. the person who wrote the script for our drawing title block included lines that would create a text box that says "Notes:". I would like to add a line to this that would skip a line after "Notes:" and add in the text from "Description" box for the linked part/product properties. Can anyone help? Any and all help is appreciated.
CATIA user here. You'll have to excuse my lack of knowledge for script writing. the person who wrote the script for our drawing title block included lines that would create a text box that says "Notes:". I would like to add a line to this that would skip a line after "Notes:" and add in the text from "Description" box for the linked part/product properties. Can anyone help? Any and all help is appreciated.





RE: adding line to script
Drew Mumaw
www.textsketcher.com
www.drewmumaw.com
RE: adding line to script
nbTexts = Texts.Count
i = 0
notFound = 0
While (notFound = 0 And i<nbTexts)
i = i + 1
Set Text = Texts.Item(i)
WholeName = Text.Name
leftText = Left(WholeName, 9)
If (leftText = "STD_Notes") Then
notFound = 1
End If
Wend
If (notFound = 0) Then
Note_01 = "Notes: " & CHRW(&H000D) & CHRW(&H000A) & " "
CreateTextAF Note_01, GetOH() + Col(3)+27,GetOV() + Row(9), "STD_Notes", catBottomLeft, 3
Texts.GetItem("STD_Notes").WrappingWidth = 91