提问:如下安装后的 TMyPanel 能在设计期时正常显示,但 TMyPanel2 在设计期时是白板,不能正常看到,为什么?
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 造成的,改成如下就可以了:
<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 群里的问题,记录一下。