[Aggression]

Спасибо всем за помощь, разобралась.
оказывается, в строке "TRBuf:=PChar(button2.caption); " нужно было добавить "+#13+#10", только и всего.
теперь все прекрасно работает.