一个自定义组件的莫名其妙的问题？

Question

我的组件TPanelExte很早就做好，并编译安装成功，我想加一个函数setinit，如下，可提示我[Error] PanelExte.PAS(15): Unsatisfied forward or external declaration: 'TPanelExte.setinit'。高手指点一下好吗？谢谢！！！
type
  TPanelExte = class(TCustomPanel)
  function setinit(s:string):string;
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
end;
implementation
function setinit(s:string):string;
begin
    result:='1';
end;

Answer 1

implementation
function setinit(s:string):string;//这一句改称：function TPanelExte.setinit(s:string):string
begin
    result:='1';
end;