[外观] Firemonkey Windows Hint 气球样式

2018-06-17 18:56:42来源:未知 阅读 ()

新老客户大回馈,云服务器低至5折

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;

 

修改前:

修改后:

 

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:AdvStringGrid使用小结

下一篇:【Spine】Spine Runtime for Delphi移植笔记(五) - spine.core