>>420
 同じですよ

TForm1.Button1Click(Sender:TObject)
begin
Exit1Click(Sender);
end;
みたいにするといいです。
Exit1Clickの 引数 つまりSenderを使ってないなら Exit1Click(nil); みたいに nil を渡しても同じです

もし Exit1ClickでSenderが Exit1である事が期待されているなら
Exit1Click(Exit1);
のようにします