为什么申请的过程必须加(Sender: TObject)？解决方案

为什么申请的过程必须加(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)却报错