>>707
イベントハンドラをひとつにしてTToolButton(Sender)で振り分ける
（イベントのOnClickで同じパラメータを持つ既存のイベントハンドラを選択できる
　配置したボタンを全部選択してまとめて設定するとあっという間に作業終了）

例えば、押したボタンの名前は
TToolButton(Sender).Name
で得られる