Upper

Civil Engineering Tools

Home > Autocad Lisps > Text_menu > Upper

Short description

Short LISP to convert selected TEXT and MTEXT objects to uppercase.

Command:

Command: TC — Converts the string contents of selected TEXT/MTEXT to uppercase.

Description:

This routine prompts the user to select TEXT and MTEXT entities, then reads every entity’s text content, converts it to uppercase using STRCASE, and rewrites the modified string back into the entity automatically.

Helper function: (if any)

No additional helper functions; uses AutoLISP built-ins: – ssget – vlax-ename->vla-object – vla-get-textstring – vla-put-textstring – strcase

Functionalities:

• Select all TEXT + MTEXT automatically using (ssget). • Loops through each entity and converts its content to uppercase. • Uses STRCASE to ensure consistent uppercase transformation. • Displays “Done.” when complete.

Result:

All selected TEXT and MTEXT objects are converted to uppercase instantly.

Images, animations etc.

XAML code:

<ResourceDictionary
 xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
 xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
 xmlns:src="clr-namespace:Autodesk.Windows;assembly=AdWindows">
 
 <src:RibbonToolTip x:Key="Uppercase">
 <src:RibbonToolTip.ExpandedContent>
 <StackPanel>
 <TextBlock Background="AntiqueWhite" TextAlignment="Left">
<Bold>Function Syntax:  TC</Bold>
<LineBreak/>
<Hyperlink>https://www.cadtutor.net/forum/topic/77227-uppercase-in-autolisp/</Hyperlink>
<LineBreak/>

<Bold>Description</Bold><LineBreak/>
This AutoLISP program <Span Foreground="DarkRed">Uppercase_txt_mtxt.lsp</Span> converts the content of selected <Span Foreground="DarkRed">TEXT</Span> and <Span Foreground="DarkRed">MTEXT</Span> objects to uppercase.<LineBreak/>
It processes multiple selected text objects in a single operation.<LineBreak/>

<Bold>Functionalities</Bold><LineBreak/>
• Select multiple <Span Foreground="DarkRed">TEXT</Span> and <Span Foreground="DarkRed">MTEXT</Span> objects at once.<LineBreak/>
• Automatically converts all selected text to uppercase using <Span Foreground="DarkRed">strcase</Span>.<LineBreak/>
• Preserves original object positions and formatting except for case change.<LineBreak/>
• Simple and efficient — runs in a single pass through the selection set.<LineBreak/>

<Bold>Important Notes</Bold><LineBreak/>
• Command to run this tool: <Span Foreground="DarkRed">TC</Span>.<LineBreak/>
• Works with both single-line and multi-line text entities.<LineBreak/>
• Displays a “Done.” message in the command line upon completion.<LineBreak/>


</TextBlock>
 



</StackPanel>
 </src:RibbonToolTip.ExpandedContent>
 </src:RibbonToolTip>
 
 </ResourceDictionary>

Uppercase_txt_mtxt.xaml Download XAML file