Noob_help_me_pls

Ставишь фокус в чат и отправляешь со стороны программы нажатия клавиш - симуляция нажатия.

Clipbrd.AsText := 'Hello';

keybd_event(Ord('H'), 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('H'), 0, KEYEVENTF_KEYUP, 0);

keybd_event(Ord('e'), 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('e'), 0, KEYEVENTF_KEYUP, 0);

keybd_event(Ord('l'), 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('l'), 0, KEYEVENTF_KEYUP, 0);

keybd_event(Ord('l'), 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('l'), 0, KEYEVENTF_KEYUP, 0);

keybd_event(Ord('o'), 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('o'), 0, KEYEVENTF_KEYUP, 0);

keybd_event(VK_RETURN, 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0);

Будет написано слово "Hello" и отправлено симуляцией нажатия Enter

Либо, помещаешь текст в буфер обмена, симулируешь нажатие Ctrl + V и Enter

keybd_event(VK_CTRL, 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(Ord('V'), 0, KEYEVENTF_KEYDOWN, 0);

keybd_event(Ord('V'), 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CTRL, 0, KEYEVENTF_KEYUP, 0);

keybd_event(VK_RETURN, 0, KEYEVENTF_KEYDOWN, 0);
keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0);