问题:TColorPanel 在运行时,选取颜色都会重绘,造成选色缓慢。
适用:Delphi XE5
修正:找出 FMX.Colors.pas 档案,并复制到自己的 Project 路径里,找到 TColorQuad.SetColor 函数,并删除下面二行:
...略
<span style="color: #0000ff;">procedure TColorQuad.SetColor(<span style="color: #0000ff;">const<span style="color: #000000;"> ValHue,ValLum,ValSat,ValAlpha: Single);
<span style="color: #0000ff;">begin<span style="color: #000000;">
<span style="color: #0000ff;">begin<span style="color: #000000;">
...略
//<span style="color: #000000;"> 删除下面二行
// <span style="color: #0000ff;">if Assigned(FColorBitmap) <span style="color: #0000ff;">then
//<span style="color: #000000;"> FreeAndNil(FColorBitmap);
...略
<span style="color: #0000ff;">end;
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。