Quantcast
Channel:
Viewing all articles
Browse latest Browse all 41617

Forum Post: GET TEXT SIZE FROM SELECTED

$
0
0
I need help... Again. Sorry... I have a Button "Get Live Text From Page" ' Description: Adds Selected Text from my Page to a TextBox. From Here I can Edit in Textbox. I also Have a Button "Add LIve Text To Page" ' Description: Adds My Text from TextBox back to page, in last position it was copied from with same Font. My dilemma is the Size. I Simply cannot figure out how to carry over the previous size as well. If it was 72 on the page and I "Got live text from Selected" , edit in textbox and add it back to my page, it adds font size as default. My orig text is still selected so im hoping it can pull from it. textShape.Text.Story.Size = sr.Text.Story.Size (is my logic but nothing holds unless I add an actual value) textShape.Text.Story.Size = 34 ( I dont want a preset) Here is what I'm working with. ActiveDocument.ReferencePoint = 9 ' first object Set sr = ActiveSelectionRange Set textShape = ActiveLayer.CreateArtisticText(ActiveLayer.Page.CenterX, 0, TextBox.Text, 0, cdrCharSetMixed) textShape.Text.Story.Font = ListAllFonts textShape.Text.Story.Size = ?????????????????? If sr.Count = 1 Then textShape.SetPosition x, y Else textShape.AlignAndDistribute 3, 3, 2, 0, False, 2 End If Set textShape = ActiveShape textShape.Text.Story.CharSpacing = 6 textShape.Text.Story.WordSpacing = 100 textShape.OrderToFront ActiveDocument.ReferencePoint = 9 ' Second Obje ct

Viewing all articles
Browse latest Browse all 41617

Trending Articles