![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
отправить значение буквы в стороннее приложение [D7, WinXP]
sotrudnik1 © (2009-06-01 08:54:00)собственно:
1. есть сторонее приложение, с заголовком допустим "каракат"
2. в нем существует хот-кей привязанный к букве "V"
как отправить средствами дельфей это значение в вышеуказанное приложение при условии что окно не активно или свернуто
P.S. если не сложно с примером
sotrudnik1 (2009-06-01 14:33:00) [21]в чем ошибка???
sotrudnik1 (2009-06-01 14:19:00) [22]PostMessage (Hnd, WM_CHAR, 'V');
несовместимые типы Integer и Char
clickmaker (2009-06-01 14:14:00) [23]> PostMessage ???????????? <-вот что тут забивать непонятно((((
Hnd, WM_CHAR и код нужной буквы
sotrudnik1 (2009-06-01 14:10:00) [24]procedure TForm1.Button1Click(Sender: TObject);
Var
Men :HMenu;
Hnd,HndDialog,HndControl,HndAsc,HndBtn :HWnd;
HndMen,HndSMen :HMenu;
StrClass :PChar;
StrBase :string;
IdBtn,idMen :integer;
begin
Hnd:=FindWindow(nil, 'Fragoria');
if Hnd <>0 then begin
windows.SetForegroundWindow(Hnd);
PostMessage ???????????? <-вот что тут забивать непонятно((((
end;
end;
clickmaker (2009-06-01 14:03:00) [25]что именно не понятно?
sotrudnik1 (2009-06-01 13:57:00) [26]огромная просьба привести пример!
заголовок окна "freename"
отпровляемое значение в него "B"...
Заранее спасибо!
sotrudnik1 (2009-06-01 13:35:00) [27]сейчас попробую! спасибо еще раз!
clickmaker (2009-06-01 13:24:00) [28]там на целый юнит не наберется, к сожалению.
2 строчки:
FindWindow
PostMessage
sotrudnik1 (2009-06-01 13:05:00) [29]содержащего код вышеназванных действий.
Заранее спасибо!
clickmaker (2009-06-01 12:02:00) [30]какого юнита?
sotrudnik1 (2009-06-01 11:56:00) [31]огромная просьба содержимое юнита скинуть!
Заранее спасибо!
clickmaker (2009-06-01 11:41:00) [32]WM_KEYDOWN
sotrudnik1 (2009-06-01 11:34:00) [33]подскажите пожалуйста!