아주 쉬운 문제인듯 합니다.
예컨데, Button1에 대하여 다음내용을 읽게 할 수 있는 기능을 주었다면
메뉴에서 내용을 다 읽은 후 다음 줄에 다음과 같이 삽입하면 간단히
해결 될 듯 싶군요.

procedure TForm1.Button1Click(Sender: TObject);
begin
   :
   내용 읽기 기능
   :
end;

procedure TForm1.N1Click(Sender: TObject);
begin
   내용 읽기 기능
   :
   Button1Click(nil);
end;

이렇게 하면 자동으로 Button1을 클릭한 것과 같을 동작을 합니다.