|
Вопрос # 4 345/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
В общем, вот код. Скажите, плиз, будет он работать не только в Windowsе? Меня интересует именно MACos... Оч благодарен...
Приложение: Переключить в обычный режим- ...
- private
- procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;
- ...
-
- procedure S(Key : byte; extra : DWORD);
-
- begin
-
- keybd_event(Key,extra,0,0);
- keybd_event(Key,extra,KEYEVENTF_KEYUP,0);
-
- end;
-
- procedure TForm1.WMHotKey(var Msg: TWMHotKey);
-
- var
- i : integer;
-
- begin
-
- if b then
- for i := 1 to q do S(w, 0);
-
- end;
-
-
-
- procedure T();
-
- begin
-
- RegisterHotKey(Form1.Handle, MyHotKey, 0, MyHotKey);
-
- end;
-
-
-
- procedure TForm1.FormDestroy(Sender: TObject);
-
- begin
-
- UnRegisterHotKey(Form1.Handle, MyHotKey);
-
- end;
-
-
-
- procedure TForm1.Button1Click(Sender: TObject);
-
- begin
-
- b := true;
- q := strtoint(edit3.Text);
- w := strtoint(edit2.Text);
- MyHotKey := strtoint(edit1.Text);
- T();
-
- end;
-
- ...
-
- end.
 |
Вопрос задал: padonak (статус: Посетитель)
Вопрос отправлен: 20 июня 2010, 13:06
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 4; последнее сообщение — 21 июня 2010, 10:49; участников в обсуждении: 3.
|
Мережников Андрей (статус: Абитуриент), 20 июня 2010, 18:47 [#1]:
в наличии есть Delphi for MacOS ?
|
|
|
padonak (статус: Посетитель), 20 июня 2010, 20:39 [#2]:
нет... если бы был, то я не спрашивал... просто программу пишу для друга, он уезжает в 3_00, сейчас 21_00... у него "аймак", поэтому и спрашиваю... если можете, то скажите "на глаз"...
|
|
Вадим К (статус: Академик), 20 июня 2010, 23:08 [#3]:
работать однозначно не будет. Потому что там формат исполняемого файла другой. Но даже если лазарус взять, тоже не будет. Точнее может не собраться. Уж сильно windows зависимый код используется.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
padonak (статус: Посетитель), 21 июня 2010, 10:49 [#4]:
Вадим К, спс... теперь хоть знать буду и друга предупредил насчёт программы...
|
22 июня 2010, 10:18: Вопрос перемещён из тематического раздела Delphi » Прочее в раздел Delphi » Оболочка Delphi, компилятор, версии среды и т.д. модератором Ерёмин А.А.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
