Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.02;
Скачать: 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 вся ветка

Текущий архив: 2008.11.02;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.017 c
15-1221120707
trubin
2008-09-11 12:11
2008.11.02
Доступен триал delphi 2009


2-1222425226
webpauk
2008-09-26 14:33
2008.11.02
как получить максимальное значение?


2-1222367999
SveTTT
2008-09-25 22:39
2008.11.02
2 запроса в одном


15-1218713094
@!!ex
2008-08-14 15:24
2008.11.02
Хочу купить монитор


2-1222238254
zdm
2008-09-24 10:37
2008.11.02
Нахождение компонент