I made a component derived from TCustomControl, for which I published the Font property. It shows up in the Property Inspector alright, but now I want to hide the Color subproperty, while keeping the other subproperties available. I tried this:

procedure Register;
begin
  UnlistPublishedProperty(TSvhProgressbar, 'Font.Color');
  RegisterComponents('SvhComponents', [TSvhProgressbar]);
end;

but this has no effect. It does hide the font property, however, when I change the second argument to 'Font'.
How can I hide the font's Color property?