type 
  TMyClass=Class
    procedure One; virtual;
  end;  TMySubClass=Class(TMyclass)
    procedure One(S:String); reintroduce; overload;
  end;

解决方案 »

  1.   

    有个稍微简单的方法,
    首先在代码的type段中象以前一样输入函数或子程序名及参数等信息,输完后,按ctrl+shift+'c',delphi将自动完成在implementation段中的程序说明及框架,你要做的只是添加代码而已
      

  2.   

    如:createParams(params),象这样的函数有很多,我总不能都记住,然后一个字母一个字母地敲吧,有没有更方便的办法呢?进来说话的都有分,到时候我会再加的,先谢了。确实比较苦恼,因为刚学。
      

  3.   

    那最好的办法,就是呼出DELPHI的帮助,参考函数的时候,将函数说明COPY下来,然后在代码里稍微修改就行啦
      

  4.   

    函数的声明和实现你都要自己输入
    从说明到实现是;CTRL+SHIFT+C;
    在函数内部用INHERITED关键字