Вниз
Скачать: CL | DM;

Как при помощи Sendinput отправить текст из tEdit?   Найти похожие ветки 

 
Romancaw   (2011-10-15 03:27) [0]

Здравствуйте!
Скажите пожалуйста, как в Delphi при помощи Sendinput отправить текст из tEdit любое приложение? Даже если моё приложение неактивно (хочу использовать горячие клавиши в ActionManager).
Буду очень признателен за помощь.


 
Rouse_ ©   (2011-10-15 03:34) [1]

Установить фокус на оно ввода и выполнить Sendinput


 
Romancaw   (2011-10-15 11:07) [2]

С кодом можете помочь?
Тут нужно что бы в фокусе было не конкретное окно, а просто то, которое активно.


 
Омлет ©   (2011-10-15 11:47) [3]

> а просто то, которое активно.

А кто, по-вашему, принимает сообщения в результате Sendinput? Активное окно и принимает. Я, честно, не понимаю, в чем у вас загвоздка.


 
Romancaw   (2011-10-15 12:00) [4]

Вот в чем загвоздка:
var
 Pos: TPoint;
 Target: HWND;
...
if not GetCursorPos(Pos) then
 RaiseLastOSError;
Target := WindowFromPoint(Pos);
if Target<>0 then
Sendinput(Edit1.Text);

Кода даже не компилируется


 
Омлет ©   (2011-10-15 12:14) [5]

Ну, как обычно.
Когда код не компилируется, компилятор выдает ошибку и показывает на строку, в которой ошибка находится. Если не можете перевести на русский текст ошибки так и скажите. А еще неплохо было бы узнать назначение Sendinput и способы работы с этим.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.004 c
15-1318345230
Awesome-o 4000
2011-10-11 19:00
2012.01.29
Прошу дать совет


2-1318975668
Gu
2011-10-19 02:07
2012.01.29
номер недели


1-1282631144
Avil
2010-08-24 10:25
2012.01.29
Разница кодировок при копировании и вставке


2-1318784462
Тима12
2011-10-16 21:01
2012.01.29
Точки вершин в tchart


2-1318406398
Laguna
2011-10-12 11:59
2012.01.29
Не воспринимается путь к файлу кирилицей




   Наверх