为什么申请的过程必须加(Sender: TObject)？
我是初学者
自己申请的过程为什么必须加(Sender: TObject)？
为什么即使不传递这个参数也必须加它呢？
另外 参数中没有这个也不报错？ 为什么？


procedure FormCreate(Sender: TObject);
procedure haha();//自己申请的过程，没有(Sender: TObject)却报错
procedure ToolButton1Click(Sender: TObject);
procedure ToolButton2Click(Sender: TObject);
procedure ToolButton3Click(Sender: TObject);
procedure ToolButton4Click(Sender: TObject);
private

[解决办法]
不可能的，可能是其它原因引起的，如没有实现代码
[解决办法]
procedure FormCreate(Sender: TObject);
// procedure haha();//自己申请的过程，没有(Sender: TObject)却报错
procedure ToolButton1Click(Sender: TObject);
procedure ToolButton2Click(Sender: TObject);
procedure ToolButton3Click(Sender: TObject);
procedure ToolButton4Click(Sender: TObject);
private
//放在private/public/protected下面就行了
procedure haha();//自己申请的过程，没有(Sender: TObject)却报错