修正 ColorPanel 选色缓慢问题

前端之家收集整理的这篇文章主要介绍了修正 ColorPanel 选色缓慢问题前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

问题:TColorPanel 在运行时,选取颜色都会重绘,造成选色缓慢。

适用:Delphi XE5

修正:找出 FMX.Colors.pas 档案,并复制到自己的 Project 路径里,找到 TColorQuad.SetColor 函数,并删除下面二行:

403_7@...略

@H_4037@<span style="color: #0000ff;">procedure@H4037@ TColorQuad.SetColor(<span style="color: #0000ff;">const@H4037@<span style="color: #000000;"> ValHue,ValLum,ValSat,ValAlpha: Single);
@H
4037@<span style="color: #0000ff;">begin@H403_7@<span style="color: #000000;">

...略

@H_403_7@//<span style="color: #000000;"> 删除下面二行
@H_4037@// <span style="color: #0000ff;">if@H4037@ Assigned(FColorBitmap) <span style="color: #0000ff;">then@H403_7@
//<span style="color: #000000;"> FreeAndNil(FColorBitmap);

...略

@H_4037@<span style="color: #0000ff;">end@H403_7@;

猜你在找的Delphi相关文章