[Giku]

наверно это очень хороший вариант, но я как новичок в нем не разобрался слишком много непонятных мне аргументов.

не меняется язык у меня потомушто для каждого прилажения свой язык (Не едина раскладка) и если в блокноте стоит русский то при нажатие кнопки меняется язык на форме а не в блокноте

решил проблему с помощью Ctrl+V

Код:

procedure TForm1.SendText(text: string);
var i: Integer;
begin
   Clipboard.asText:=text;
   keybd_event(VK_LCONTROL, 0, 0, 0);
   keybd_event(Ord('V'), 0, 0, 0);
   keybd_event(Ord('V'), 0, KEYEVENTF_KEYUP, 0);
   keybd_event(VK_LCONTROL, 0, KEYEVENTF_KEYUP, 0);
end;

text -то что надо послать

скажите пожалуйста нормально ли это и какие проблемы могут возникнуть при этом ???