Авто ввод текста на html-странице

[Vladimir K.]

Загружаю страницу в WebBrowser, устанавливаю курсор в нужную позицию ввода текста...
А как ввести текст?
Подскажите, пожалста.

[Stilet]

Ну вообще то наверное пальчиками по клавишам клавы

[Vladimir K.]

А если меня нет дома?
Я оставляю комп работать - качать фильмы или еще что, а моя программулина следит за всем этим, и каждый час, например, отправляет мне на мобильный SMS-ки, что, мол, усё путем.
Я у себя на сайте разместил форму для отправки sms, взятую отсюда: http://uabest.net/sms.php, моя прога загружает страницу в WebBrowser, пишет текст, и отправляет мне.
Если sms-ка не пришла в положенное время, значит нужно в обеденный перерыв бежать домой - вправлять всей этой технике мозги.
Вот курсор я могу установить в нужную позицию и кликнуть, а как текст ввести - не знаю.

[Карась]

Конкретно про это можно почитать из архива форума.
http://programmersforum.ru/archive/i...hp/t-5239.html

Да и вообще полезно почитать:
http://programmersforum.ru/archive/index.php/f-3.html

[zetrix]

Если мне не изменяет память keybd_event вам поможет.

Из Win32 Developer's References

The keybd_event function synthesizes a keystroke. The system can use such a synthesized keystroke to generate a WM_KEYUP or WM_KEYDOWN message. The keyboard driver's interrupt handler calls the keybd_event function.

VOID keybd_event(

BYTE bVk, // virtual-key code
BYTE bScan, // hardware scan code
DWORD dwFlags, // flags specifying various function options
DWORD dwExtraInfo // additional data associated with keystroke
);


Parameters

bVk

Specifies a virtual-key code. The code must be a value in the range 1 to 254.

bScan
Specifies a hardware scan code for the key.

dwFlags
A set of flag bits that specify various aspects of function operation. An application can use any combination of the following predefined constant values to set the flags:

KEYEVENTF_EXTENDEDKEY If specified, the scan code was preceded by a prefix byte having the value 0xE0 (224).
KEYEVENTF_KEYUP If specified, the key is being released. If not specified, the key is being depressed.

dwExtraInfo
Specifies an additional 32-bit value associated with the key stroke.

[Alar]

Если курсор уже установлен, то программно можно из буфера, например, по таймеру.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
memo1.Text:=Clipboard.AsText;
end;

[Vladimir K.]

Мне ж не в memo вводить надо, а в форму на сайте.

Пробую сделать так:

// Эмуляция нажатия клавиш:
procedure PressKey(VKey: Byte);
begin
 keybd_event(VKey, 0, 0, 0);
 keybd_event(VKey, 0, KEYEVENTF_KEYUP, 0);
end;

PressKey(Ord('7'));            - цифры вводятся нормально
PressKey(Ord('П'));             - а буквы не вводятся.

Как буквы вводить?