2011-02-14 123 views
7

我想提出一个用例图,而问题是:文本换行使用中的情况下,在Microsoft Visio

我键入一些文字,它总是在一行中显示,使我的用例elipse太大。有谁知道如何让它进入下一行?我觉得这个选项在StarUML中被称为换行文本...

提前谢谢!

Nanek

回答

0

尝试编辑对象属性对话框中的TextBox属性。

+0

然后做什么? – 2012-09-30 21:11:38

2

程序用于施加Word环绕:

  1. 选择从图中区域要应用Word环绕的元件。

  2. 右键单击并选择[格式] - > [文字包装名称]菜单。

再次执行上述步骤以删除Word Wrap。

+0

哪个版本的Visio是那个?在Visio 2003中没有这样的选项。 – Alex 2012-08-03 08:34:33

+0

Visio 2010都没有这个选项。 – utapyngo 2013-06-14 03:03:25

-1

点击进入文本框,然后在下一行所需的文本之间按回车。

+0

用例模板受到保护,不允许您直接编辑文本。相反,您必须使用用例属性对话框来设置用例的名称 - 并且您不能在此处输入换行符。 – 2012-09-30 21:08:59

1

我发现通过在文字之间加入额外的空格,我可以让Visio来包装文字。我必须添加足够的空间,以便能够超出用例的文本框的边界。有时这会导致两个不同单词之间出现换行符,所以我必须在用例名称的其他地方添加额外的空格。

这确实会导致用例在Visio的Model Explorer任务窗口中显示得很奇怪,但这并没有打扰到我。

4

在Microsoft Visio 2007中,首先需要选择形状,右键单击它并选择“格式”,然后选择“保护...”并取消选中“文本”复选框,然后单击确定。这将允许编辑形状文本。 完成后,您可以选择您的用例形状,从标准工具栏中选择“文本工具”。用例文本将显示为文本框。您可以在必要时按Enter键,然后单击“指针工具”完成操作。

+0

谢谢!真正有效的唯一解决方案 – damluar 2013-01-24 22:15:29

0

选择形状。 使用此菜单:[主页] - > [工具] - > [文本] 现在可以在形状上进行文本编辑。 现在只需按Shift + Enter就可以在每一个你想要结束的地方输入,你可以手动换行。 好运

2
  1. 右键单击该用例。
  2. 选择“显示ShapeSheet”。
  3. 向下滚动到“保护”部分。
  4. 将“LockTextEdit”附近的值更改为0
  5. 关闭ShapeSheet。

现在按F2并编辑名称。添加换行符输入

单独取消保护每个用例非常繁琐。如果您正在创建一个新图,您可能需要取消保护一个用例并将其复制,而不是从调色板添加新用例。

向用例名称中添加换行符的缺点是,当您修改其属性时,该名称将截断为第一个换行符。幸运的是,除了名称和文档之外,用例没有很多有用的属性。

1

首先删除由文本的保护: 右键单击使用情况,选择“格式”,然后“保护”,取消选中“文本”

接下来,再次选择用例 然后按下键“ F2“ ,现在你可以输入你的文字了。按“Enter”键编辑多条线 享受

1

当您希望编辑形状时,需要解锁应用于形状的保护属性。这里没有答案告诉你如何显示“形状数据”。

  1. 您需要选择顶部的文件菜单。选择“选项”并选择“高级”
  2. 向下滚动直到结束并选择“在开发者模式下运行”。按确定。
  3. 选择顶部的Home菜单返回到您的图表。
  4. 右键单击您的形状(假设您正在编辑用例形状)
  5. 选择“显示ShapeSheet”选项。
  6. 您将能够在图表窗口下方看到一个窗口。在此窗口中,向下滚动,直至看到“保护”首选项。
  7. 选择“LockTextEdit”变量并双击并将1更改为0.按enter保存您的偏好。
  8. 现在单击形状并从格式菜单中选择“文本”。
  9. 单击文本,您将能够编辑它。在需要插入换行符的文本之间按Enter键。
0

Real text wrap;没有血腥的回车。

Visio 2010. SysML模板(来源未知)'活动图'中的'活动'形状对形状集合进行了形状化。

  1. 如果你不能看到功能区中的“开发者”选项卡:
      文件>选项>自定义功能区> [选择“开发者”的“主选项卡”列表]
  2. 右键单击感兴趣的形状和选择 '显示ShapeSheet'
  3. 查找感兴趣
      文本的width属性从(像)变换> TxtWidth
  4. 变化在TxtWidth属性单元
    • 式“= MAX(C har.Size,文本宽度(TheText))”
    • 到 '= MIN(宽度 - 0.08,MAX(Char.Size,文本宽度(TheText)))'
  5. 享受。

这里的魔术是减数-0.08。没有它,我无法将形状做得更小,因为公式不允许文本宽度小于形状宽度,并且形状宽度似乎自动限制为至少文本宽度。乐趣。你可能会发现需要一个更大的减法器,或者你可以逃脱一个更好的减法器。

如果可以的话,保存已将此更改作为模板的形状。

这里是快速/肮脏的VBA我曾经跨越“操作”的所有块套用公式变化:

Public Sub ApplyWrapTextPropertyToAllActionBlocks() 
Const STR_ACTION_BLOCK_NAME As String = "Action with Wrap Text." 
Const STR_DECREMENTER  As String = "-0.08" 

Dim objShape    As Shape 
Dim objActionBlock   As Shape 

For Each objShape In ActivePage.Shapes 
    If InStr(1, objShape.Name, STR_ACTION_BLOCK_NAME, vbBinaryCompare) <> 0 Then 
     Debug.Print "Found one: " & objShape.Name 

     Set objActionBlock = objShape 

     objActionBlock.CellsU("TxtWidth").Formula = "=MIN(Width" & STR_DECREMENTER & ",MAX(Char.Size,TEXTWIDTH(TheText)))" 
    End If 
Next objShape 

末次