如何在工具提示中自动换行

Question

如何自动换行需要在工具提示中显示的文本

Answer 1

看起来它不是直接支持的:

如何自动换行显示的工具提示？

这是使用Reflection实现此目的的方法.

[ DllImport( "user32.dll" ) ] 
private extern static int SendMessage( IntPtr hwnd, uint msg,
  int wParam, int lParam); 

object o = typeof( ToolTip ).InvokeMember( "Handle",
   BindingFlags.NonPublic | BindingFlags.Instance |
   BindingFlags.GetProperty, 
   null, myToolTip, null ); 
IntPtr hwnd = (IntPtr) o; 
SendMessage( hwnd, 0x0418, 0, 300 );

瑞德贡

Answer 2

另一种方法是创建一个自动包装的正则表达式.

WrappedMessage := RegExReplace(LongMessage,"(.{50}\s)","$1`n")

链接