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

Как в приложении запустить горячие клавиши   Найти похожие ветки 

← →
Раф   (2007-07-30 17:00) [0]

То есть я знаю определенный набор клавиш, которые мне нужно нажать для запуска определенной команды, подскажите как это сделать
Мне нужно нажать (Alt, "А", "Г" и два раза #13)

---

← →
DVM ©   (2007-07-30 17:02) [1]

В приложении окна есть? Если да, то в момент нажатия окно фокус ввода имеет?

---

← →
Рафик ©   (2007-07-30 17:22) [2]

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

---

← →
DVM ©   (2007-07-30 17:24) [3]

Программа чужая что ли?

---

← →
Рафик ©   (2007-07-30 17:26) [4]

Да

---

← →
DVM ©   (2007-07-30 17:30) [5]

вот посмотри по ссылкам http://www.yandex.ru/yandsearch?text=SendKeys+Delphi

---

← →
Раф   (2007-07-31 11:07) [6]

Ничего не происходит, меню не активируется, что не так сделал?

procedure TForm1.Button2Click(Sender: TObject);
Var
s:Hwnd;
begin
 StrPCopy(APchar, ""c:\Program Files\1C7\BIN\1cv7.exe" CONFIG /DE:\Temp\1C7\ /NМихаил /P****");
 s:=WinExec(APchar,SW_RESTORE);
//s:=FindWindow(nil, PChar("Конфигуратор - Производство 2006"));
SendKey(s,#18);
SendKey(s,"А");
SendKey(s,"Г");

---

← →
DVM ©   (2007-07-31 12:49) [7]

> Раф   (31.07.07 11:07) [6]

Ерунду написал, вот и не происходит.

Во-первых, что такое SendKey(). Ты код ее приведи, если нашел где то.
Во-вторых, я подозреваю, что SendKey() первым параметром хочет хэндл окна. А где ты этот хэндл получаешь? Ты единственную строку, которая может вернуть такой хэндл закомментировал.
В-третьих, WinExec() возвращает значение никаким боком к хэндлу окна запускаемого приложения не относящееся.

---

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

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



Память: 0.46 MB
Время: 0.034 c