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

Вопрос про хук.   Найти похожие ветки 

← →
vegarulez ©   (2008-09-23 09:31) [0]

добрый день мастерам!
Вопрос такой - раньше пользовался хуком - открыл код скопировал - вставил в другое приложение - а он ругается... Там видимо было приложение VCL а здесь CLX - помогите разобраться. Как тут сделать код рабочим.

unit Unit1;

interface

uses
 Windows,SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
 QDialogs, QStdCtrls, messages;

type
 TForm1 = class(TForm)
   procedure FormCreate(Sender: TObject);
   procedure FormDestroy(Sender: TObject);
   procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation
const
MyHotKey = VK_SUBTRACT; //  VK_DELETE;}
{$R *.xfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterHotKey(Form1.Handle, MyHotKey, 0, MyHotKey);  // хук
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Form1.Handle, MyHotKey);  // хук
end;
procedure TForm1.WMHotKey(var Msg: TWMHotKey);
begin
Label1.Caption:="123123";
end;


при компиляции ругается и выдаёт такую ошибку -
[Error] Unit1.pas(32): Incompatible types: "HWND" and "QOpenScrollViewH"

---

← →
Рамиль ©   (2008-09-23 11:13) [1]

А зачем тебе виндовый хук в CLX?

---

← →
Правильный$Вася   (2008-09-23 11:18) [2]

и что тебе непонятно?
функция ожидает другой тип параметра
hwnd - это для виндоуз
открывай справку по функции и читай

---

← →
vegarulez ©   (2008-09-23 11:33) [3]

Рамиль ©   (23.09.08 11:13) [1]
Ну приложение в винде работает просто cоздано изначально было как CLX application

Правильный$Вася   (23.09.08 11:18) [2]
По F1 ничего вообще не выводит сечас в инете посомтрю. если есть ссыль буду признателен.

---

← →
vegarulez ©   (2008-09-24 09:57) [4]

мастера... нид хелп...
ничего путёвого не нашёл - все примеры, что нашёл работают под VCL а под CLX не хотят...
hwnd - я так понял это окно программы, как получить тогда верно его идентификатор?

---

← →
vegarulez ©   (2008-09-24 17:37) [5]

мастеры... помогите плиз...

---

← →
Palladin ©   (2008-09-24 17:54) [6]

а с каких щей они будут под clx работать? если ты пользуешься функцией WinAPI... если тебе не понятно, то WinAPI потому называется WinAPI потому что она Win, что есть сокращение от слова Windows

---

← →
Palladin ©   (2008-09-24 17:54) [7]

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

---

← →
vegarulez ©   (2008-09-25 06:06) [8]

> uses  Windows

---

← →
vegarulez ©   (2008-09-25 06:08) [9]

только QForms, ругаются...

---

← →
Правильный$Вася   (2008-09-25 10:41) [10]

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

---

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

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



Память: 0.47 MB
Время: 0.011 c