Firemonkey 在 Windows 平台下的 Hint 默认为距形，有些单调，现在只要加入一行代码，就可以有气球箭头样式的 Hint。
修改代码：
请将 FMX.Controls.Win.pas 复制到自己的工程目录下，再修改如下代码：
constructor TWindowsHint.Create(const AHandle: TWindowHandle); ... 略 ... FToolTipHandle := CreateWindowEx(0, TOOLTIPS_CLASS, nil, WS_POPUP or TTS_ALWAYSTIP {+++>} or TTS_BALLOON // 加入此行代码 ,0, 0, 300, 300, FNativeControlHandle, 0, hInstance, nil); ... 略 ... end;
修改前：
修改后：
[外观] Firemonkey Windows Hint 气球样式
原文：http://www.cnblogs.com/onechen/p/6950690.html