启用运行时主题时，不会显示PngBitBtn的标题

Question

我使用一个PngBitBtn创建了一个简单的项目，然后使用以下配置对其进行编译：

1. 运行时主题已禁用
   • 调试模式 - 确定
   • 发布模式 - 确定
2. 启用运行时主题
   • 调试模式 - 确定
   • 发布模式 - PngBitBtn上没有标题

正确显示字幕的唯一方法是关闭优化。是否有可能在不关闭优化的情况下解决这个问题？

提前谢谢你，蒂姆

在Delphi XE3，XE6上测试。 平台：win32。 PNGComponents版本：最新版本来自embarcadero CodeCentral。

打印屏幕：

Answer 1

只是一个错误！

要修复它，请在PngBitBtn.pas方法的第326行插入以下行TPngBitBtnStyleHook.DrawButton：

  Offset := TPoint.Create(0, 0);

该区域的代码现在应如下所示：

  if not (Control is TPngBitBtn) then
  begin
    inherited;
    Exit;
  end;
  Offset := TPoint.Create(0, 0);
  DrawRect := Control.ClientRect;