我是新手，麻烦告诉我怎么添加一个自定义函数啊

Question

我是新手，麻烦告诉我怎么添加一个自定义函数啊

Answer 1

function youfun(sender:tboject);
begin
end;
就OK了呀，要不然找个源程序看看吧

Answer 2

有没有像VC那样的，在类上点右键后，然后选择添加函数后，输入名称类型就OK的那样就实现的功能 啊？

Answer 3

自动添加可以这样，以窗体类为例，其他一样type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    //比如定义一个public过程
    procedure yourfun;//然后ctrl+shift+c 就行了
  end;

Answer 4

学习,好像delphi没有那么类似vcvb的功能。

Answer 5

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  procedure myfun(var mypara:string;):string;
end;
 ctrl+shift+c 就行了