Такой вопрос:

Есть 2 события:
Например:
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);

как при нажатии на вторую кнопку выполнить все действия из обработчика первой кнопки?

Про Ctrl+C , я знаю, но здесь это не очень актуально