急。过程调用？？？？？？？？？？？

Question

我自己定义了一个过程，并通过一个按钮的ONCLICK事件调用这个过程，可是程序总是执行不过去呀。各位帮我看一下好吗？我的程序是这样写的。
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    procedure wwww(sender: Tobject);
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}
procedure wwww(sender: Tobject);
 begin
   showmessage('eeee');
 end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  //form1.wwww;
  button1.onclickk:=Tform1.wwww(sender);
end;end.

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  //form1.wwww;
  //button1.onclickk:=Tform1.wwww(sender);
  wwww(sender);  //如果只想通过单击按钮调用过程 那么直接调用就OK了
end;

Answer 2

另外 你的 wwww过程里 用 Sender: TObject 参数 是什么用意 ？

Answer 3

是这样的，我先写了一个过程，然后我动态创建了一个按钮，然后这个按钮的ONCLICK事件就调用这个过程。可是我的这个程序就是编不过去，不会是系统的问题吧。请大家帮我试一下好吗？

Answer 4

按  jinjazz(近身剪（N-P攻略）) 做过了吗button1.onclick:=form1.wwww;

Answer 5

procedure TForm1.wwww(sender: Tobject);
 begin
   showmessage('eeee');
end;

Answer 6

过程定义没有问题  
procedure wwww(sender: Tobject); 
应如下
procedure TForm1.wwww(sender: Tobject);请 jinjazz(近身剪（N-P攻略）) 到这里 http://community.csdn.net/Expert/topic/3812/3812071.xml?temp=.275799 
谢谢!!