SendMessage + WM_KEYDOWN

[fate]

хочу чужому окну передать символ s, пробую

HWD:=findwindow(nil,'Безымянный - Блокнот');
SendMessage(HWD,WM_KEYDOWN,0x53,null);

но мне компилятор выдает Not enough actual parameters
почему?
Хотя если передавать вместо 0x53 например VK_TAB компилируется нормально

[veniside]

$53 ;

[fate]

спасибо, скомпилировалась, но не то что мне нужно ((
я хочу передать ctrl + s
пишу

SendMessage(HWD,WM_KEYDOWN,VK_CONTROL,0);
SendMessage(HWD,WM_KEYDOWN,$53,0);

но ничего не происходит. Вроде как в LPARAM что-то нужно указать, читал msdn но не понял что там указать

[fate]

можно конечно SetForegroundWindow сделать нужное окно активным а потом keybd_event, но я хочу попробовать через SendMessage

[veniside]

SendMessage(HWD, WM_KEYDOWN, VK_CONTROL, $1D0001);
SendMessage(HWD, WM_KEYDOWN, $53, $1F0001);

если не поможет, то или HWD кривой, или нужно как-то по-другому..

[fate]

0 эмоций.

а почему ты именно такие значения указал в lparam?

[veniside]

а я подсмотрел, чё там реально приходит:

procedure wmKD(var msg: TWMKeyDown); message WM_KEYDOWN;

procedure TForm1.wmKD(var msg: TWMKeyDown);
begin
  Memo1.Lines.add('CC = ' + IntToStr(msg.CharCode) + '; KD=' + IntToStr(msg.KeyData));
end;

но, видимо, чего-то не хватает..