[问答] Firemonkey 控件继承后无法显示空白

提问:如下安装后的 TMyPanel 能在设计期时正常显示,但 TMyPanel2 在设计期时是白板,不能正常看到,为什么?

TMyPanel = TMyCustomPanel = <span style="color: #0000ff">class<span style="color: #000000">(TPanel)

TMyPanel2 = <span style="color: #0000ff">class<span style="color: #000000">(TMyCustomPanel)
<span style="color: #0000ff">end<span style="color: #000000">;

RegisterComponent(<span style="color: #800000">'<span style="color: #800000">Test<span style="color: #800000">',[TMyPanel,TMyPanel2]);

可能:是隔代无法继承 Style 造成的,改成如下就可以了:

TMyPanel = TMyCustomPanel = <span style="color: #0000ff">class<span style="color: #000000">(TPanel)
<span style="color: #0000ff">end
<span style="color: #000000">;

TMyPanel2 = <span style="color: #0000ff">class<span style="color: #000000">(TMyCustomPanel)
<span style="color: #0000ff">protected
<span style="color: #0000ff">function GetDefaultStyleLookupName: <span style="color: #0000ff">string; <span style="color: #0000ff">override<span style="color: #000000">;
<span style="color: #0000ff">end<span style="color: #000000">;

<span style="color: #0000ff">function TMyPanel2.GetDefaultStyleLookupName: <span style="color: #0000ff">string<span style="color: #000000">;
<span style="color: #0000ff">begin<span style="color: #000000">
Result := <span style="color: #800000">'<span style="color: #800000">panelstyle<span style="color: #800000">'<span style="color: #000000">;
<span style="color: #0000ff">end;

ps. 这个是 QQ 群里的问题,记录一下。

相关文章

 从网上看到《Delphi API HOOK完全说明》这篇文章,基本上都...
  从网上看到《Delphi API HOOK完全说明》这篇文章,基本上...
ffmpeg 是一套强大的开源的多媒体库 一般都是用 c/c+&#x...
32位CPU所含有的寄存器有:4个数据寄存器(EAX、EBX、ECX和ED...
1 mov dst, src dst是目的操作数,src是源操作数,指令实现的...