I still see a lot of these methods:

function TPanelMinimizeButton.GetInterfaceClassName: String;
begin
  Result:=TPanelMinimizeButton.ClassName;
end;


since there is this method now:

function TInterfaceController.GetInterfaceClassName: String;
begin
  Result:=ClassName;
end;


Is the code of the first method still necessary?

cu Christian

Christian,

<< Is the code of the first method still necessary? >>

Yes, I looked into this and remembered why it was necessary.  If a descendant control does *not* implement an interface that matches its class name (TForm1 = class(TForm) -> every single form in a visual project), then the control will have no interface.

Tim Young
Elevate Software
www.elevatesoft.com