In a drawing, i have several text strings, 's', that i would like to change to a known block... is this able to be done? there are over 3000 's' in the drawing, hoping to change them all to the same block. let me know if this can be done.
View 2 Repliesin a drawing, i have several text strings, 's', that i would like to change to a known block... is this able to be done? there are over 3000 's' in the drawing, hoping to change them all to the same block.
View 9 Replies View RelatedI have a custom iProperty with a text value of "Plate, Steel 140 mm". Is it possible to strip out the 140 (text) from the string and convert it to a number?
View 7 Replies View RelatedI was wondering if there is a way that AutoCad can edit one text string and the same change can affect another text string, instead of editing the same thing twice.
View 9 Replies View Relatedi failed to find one which would change string of a text to other for all types of objects. I mean it was usually either only multitext, or only text, dimensions or attributes.creating one which would change in abt 200 drawings:
-001
-002
-003
to:
-00001
-00002
-00003
in attributes, text, multittext, leaders, multileaders, dimensions..... at the same moment?
It is meant to be used in ScriptPro (by loading lisp in script).
If not possible, then can also open each file and run the lisp in each of them - still would save lot of time.
Is there a way when finding and replacing a text string to style the block of copy. My problem is that I have some color codes given by the customer that now need to be converted to our internal color matches on our production drawings.
The original string of text looks like this:
Holder: P1 (Metallic Silver)
What I’m getting when I go to replace this string is:
Holder: Natural Satin
What I want is:
Holder: Natural Satin
I do not want the replaced text to be italicized. I'm thinking since the original string ends with an italic style that the replacement string is also italicized. There are about 50 pages of drawings with about 10 colors on the job and some pages have them entered in more than one place. So that's a minimum of 500 entries and defititely more considereing the multiple places these are called out. I'd really rather not have to copy and paste all of these by hand. I'm use to FreeHand, which would respect the font styling of pasted text in the find and replace diaglog.
I created a legend in the Block Editor which obviously requires text. I inputted the block into paper space because it's easier to input it into paper space for location purposes on the drawing.
Everything was fine, but when I went to plot it (by converting it from .dwg to .pdf), the pdf showed the text plotting vertically (down to up) instead of horizontally (left to right). I've checked the properties of the text, nothing is glaringly wrong, and since it only appears after being plotted to .pdf, I'm not really sure what the problem is.
Are there restrictions to adding blocks to paper space that I'm unaware of?
I wrote this little piece of code (attached) that explode all the blocks in the current drawing.This is magical, compared with what we had to do in VBA.
This works perfectly but now I want to go deeper and managed blockreferences with attributes.Based on my code, I can determine if oBTR.HasAttributeDefinitions is true or false.
If the blockreference has attributes, I suppose I will have to use Explode instead of ExplodeToOwnerSpace.
My first question is, using explode, I need before to know in which space the blockreference is inserted (Model or any layout) so to insert the exploded entities correctly. So, is it possible from a blockreference to get its own SpaceId?
An another idea I had is to edit the blockreference (not the block definition) to replace attributes with text...
I am using AutoCAD 2000i I would like to click a button, hide the form, pick the text, I'm only picking one text item, then insert the picked text into a block. Then put the text into the attribute in the block..Insertion point of the block next to the text item.
Private Sub CommandButton2_Click()
frmGetData.Hide
'Set sset = ThisDrawing.SelectionSets.Add("SS3")
Set sset = ThisDrawing.PickfirstSelectionSet
sset.SelectOnScreen
'For Each ssobject In sset
'msg = msg & vbCrLf & ssobject.ObjectName
[code]....
I've been looking for a solution to remove the unit string ie Lbs, g, kg from the value given from a 'Mass' value in a text string.
As you may all know, creating text and having a 'physical property - mass' value...the unit string is there...
Lots of people on here have the problem...no-one has got a solution.
Until now...
Basically...open the part you need to get the mass property of in your text string.
Follow the instructions on this webpage...this is the first part...
[URL]
Basically, this creates a Mass property value in the parameters table that you can call on as a text parameter.
It's similar to the custom iproperty model - mass but NOT the same.
Once you have done this, you can go to the drawing of the part and create a text string in the drawing and call it up as shown in this procedure. BUT it still has the unit string.
Here's the best bit that you want to know...
To get RID of the unit string...open up the part again from the drawing...click on the parameter icon...find the user parameter...in the Nominal value column, right click on the value and you get a pop-up that gives you 3 options...
Custom Property Format, Make Multi Value & Delete Parameter.
Click on Custom Property Format.
The pop-up window comes up...showing you the property type...in my case...the 4 left columns read Text, g (grams), Format & Precision...
On the right hand side I have a Preview of the text...then 3 check boxes...Units string, Leading Zero's, Trailing Zero's.
Units string is checked.
Uncheck it.
Close it...Save your part...go back to the drawing and hey presto!...the text now shows the weight you require as a straight value...no units!
I have this interresting problem, it occured just here, in other situations, the script works fine.
I am counting length from coordinates:
Command: (setq bod1 ppo_bod1)(-0.821965 -1.7232 0.0)Command: (setq bod2 ppo_bod2)(25.428 13.1268 0.0)Command: !mfac0.025Command: (setq x (atoi (rtos(/ (abs (- (car bod2) (car bod1))) mfac))))1050Command: (setq y (atoi (rtos(/ (abs (- (cadr bod2) (cadr bod1))) mfac))))593Command: (- (cadr bod2) (cadr bod1))14.85Command: (/ (abs (- (cadr bod2) (cadr bod1))) mfac)594.0Command: (rtos(/ (abs (- (cadr bod2) (cadr bod1))) mfac))"593.99999998"Command: (atoi (rtos(/ (abs (- (cadr bod2) (cadr bod1))) mfac)))593
As you can see, the conversion from 594.0 (real) to string causes an inaccuracy, which is strange, because the length really is 594.0
I have a lot of attribute blocks in my drawing which i want to move them one by one
so , here is what i want to do :
I have numbers (or texts) in my work area and this numbers also exist in my attribute blocks .. i wanna move my attribute blocks with tag name value reference to my specify area if tag name values are matching with text or numbers in this area .. every block will check my selected tag string and will be move on matching text in my work area.
What I want to do is have text edit for single line text to start at the end of a string of text instead of high lighting the entire text. Is it possible to do this?
View 4 Replies View RelatedInstead of adding text as a prefix or suffix i would like to know if it is possible aswell to remove text from within text: For example:
I have these texts "I am not good", "he is not good", "what not to be" And i would like to remove the word "not" from all selected text so i would get "i am good", "he is good" , "what to be". The set word not will always be the same, so there is no need for user string input.
I change a block's attributes programmatically using thisfunction I created:
private void UpdateAttributes(Database database, Detail det) { using (Transaction tr = database.TransactionManager.StartTransaction()) { //Grab the BlockReference the detail refers to. BlockReference block = (BlockReference)tr.GetObject(det.ObjectId, OpenMode.ForRead); //Iterate over the Attribute ids. foreach (ObjectId [code].......
You can ignore the Detail and Detail Attribute objects as they are also user-defined. Also note that this function expects the database to be currently open for working on.
Everything in this function works fine, but there is a strange quirk that becomes noticeable only when I use this function to edit an attribute that has its "Invisible" property set to "No".
Below, is the original block that is edited via this function:
As you can see, the block has a number with 4 digits (for our purposes, call this the Block Number).
I know it is easy to enter special characters in using “%%” escape sequence. However, if I am not entering in single or multiline text, but rather in a dimension annotation’s “override” field, I found that the newly entered text completely overrides the original dimensional annotation.
For example, if originally I had a diameter of 7.98, and I would like to put a Φ sign in front of it to make Φ7.98, but it seems that there is no way to preserve the original content of 7.98 together with the Φ sign.
Is it possible to keep the original measurement within the string? What is the special character representing the original measurement?
I want to have a string of text that is curved at a given radius.
View 9 Replies View RelatedI am trying to add text to a set of text strings in a drawing.
The tricky part is that not all of the text strings are the same.
For example, change part numbers
123, 125, 456, 892
to
123-70, 125-70, 456-70, 892-70
Is there a way to do this for all of the strings at once?
I have spent the last three days writing a lisp program that will copy a text string from one text file and paste it into another. I have tried using the write-string, get string, prin1, princ and print functions with no success.
View 2 Replies View RelatedI'm looking for a function to return the actual text from an mtext object.if there's a carraige return I wish to replace it with a space.
View 4 Replies View RelatedI have text with number string. ( eg: weight 50 kg, xyz weight 362 kg)i want to extract the number values of "50" & "362" from the text string.
View 9 Replies View RelatedI was writing code for my custom .net extension dll and one of the procedure involved therein was to replace the Text of MTEXT and DBTEXT entities with some predetermined Text String. I am using C#, AutoCAD 2012, and Visual Studio 2010. Here is the part of code wherein I am trying to replace the Text String of the MTEXT or DBTEXT entities.
foreach (SelectedObject selectedObject in selectionSet) { Entity currentEntity = transaction.GetObject(selectedObject.ObjectId, OpenMode.ForWrite, false) as Entity; if (currentEntity == null) { continue; } if (currentEntity.GetType() == typeof(MText)) { ((MText)currentEntity).Contents = textToCopy; } else { ((DBText)currentEntity).TextString = textToCopy; } } transaction.Commit();
The issue is that the text of the MTEXT or DBTEXT is not getting replaced with the string I am trying to. I debugged the code and it correctly hits the setting of MText.Contents == "Some String" and also transaction.commit(). But the text of the MTEXT still remains to the old value. Is this the correct way of changing the text of MTEXT / DBTEXT through the .Net API.
I am populating iProperty "Description" field using expressions from the custom fields. These custom fields are exported from the parameters.
Is there a way of typing in extra plain text into the field onto the end of the expression without losing the expression formula?
Inventor 2010 Pro SP4, Vault Collaboration 2010
HP Z820 Xeon E5-2643 0 @ 3.3Ghz 16.0GB RAM
Nvidia Quadro 5000
In order to avoid duplicate text string in different places in the same drawing, I would like to have such a tool to find duplicate text string.
For instance, I want to put numbering of some connection lines, I do not want to have different lines but have same number by mistype.
I'm trying to create an iLogic rule that will print a text string to a cell or coloum of a parts list in inventor.
My code so far...
Sub Main()
On Error Resume Next
Dim oDrawDoc As DrawingDocument
oDrawDoc = ThisApplication.ActiveDocument
[code]......
I want to print what is in the Message Box into a cell in the parts list, and i am stumped. The cell i am trying to print to is a user property in the Parts List.
I would like to know how I can compare the value of a variable to a set string of text if the two prove to be equal perform task A if the two prove different perform task B?
View 7 Replies View RelatedI need a lisp routine that will add or subtract to modify a value in a text string. Its used for drainage fixture units on waste & vent plans. Example: We use basic dtext strings that look like this [color=red]4"(6)[/color]I would like to be able to add or subtract to the number that is [b][size=12pt]ONLY[/size][/b] in parenthesis and would like to be able to pick multiple text strings at one time so it would result in something like this: [color=green]4"(6)[/color] + 9 will become [color=blue]4"(15)[/color].
View 9 Replies View RelatedI have spent the last three days writing a lisp program that will copy a text string from one text file and paste it into another. I have tried using the write-string, getstring, prin1, princ and print functions with no success.
View 6 Replies View RelatedI'm trying to create an iLogic rule that will print a text string to a cell or column of a parts list in inventor.My code so far...
Sub Main()
On Error Resume Next
Dim oDrawDoc As DrawingDocument
oDrawDoc = ThisApplication.ActiveDocument
[code]...
I want to print what is in the MessageBox into a cell in the parts list, and i am stumped.The cell i am trying to print to is a custom property in the Parts List.
Someday the light bulb is going off and I will understand mapcar and lambda. However.....I have a program that reads an excel file sheets. Sometimes the sheet only has 1 column, sometimes 2 or more.
I need to convert the saved values from the sheet to a list with the text spaced evenly. Unfortunately the text lengths vary. I would like a subroutine to pass the list to and return a list of strings with text aligned with padded spaces allowing for the longest text in each column. I am using the new list in a dialog box with fixed_width_font=true (so columns align).
Example 1-
(setq List1 (list "Col1-Line1" "Col1-Line2" "Col1-Line3-longer" "Col1-Line4"))
(AlignText List1)
returns
"Col1-Line1"
"Col1-Line2"
"Col1-Line3-longer"
"Col1-Line4"
so no padding needed
Example 2 -
(setq List2 (list (list "Col1-Line1" "Col1-Line2" "Col1-Line3-longer" "Col1-Line4") (list "Col2-Line1-longer" "Col2-Line2" "Col1-Line3" "Col2-Line4")))
(AlignText List1)
returns
"Col1-Line1 Col2-Line1-longer"
"Col1-Line2 Col2-Line2 "
"Col1-Line3-longer Col2-Line3 "
"Col1-Line4 Col2-Line4 "
Example 3 -
(setq List3 (list (list "Col1-Line1" "Col1-Line2-longer" "Col1-Line3" "Col1-Line4") (list "Col2-Line1-longer" "Col2-Line2" "Col1-Line3" "Col2-Line4") (list "Col3-Line1-longer" "Col3-Line2" "Col1-Line3" "Col3-Line4")))
returns
"Col1-Line1 Col2-Line1-longer Col3-Line1-longer"
"Col1-Line2-longer Col2-Line2 Col3-Line2 "
"Col1-Line3-longer Col2-Line3 Col1-Line3 "
"Col1-Line4 Col2-Line4 Col3-Line4 "
how to do the string art on the text.
Can I do this with PS?