Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.04;
Скачать: CL | DM;

Вниз

Опять НООКи   Найти похожие ветки 

 
anod ©   (2003-05-31 07:02) [0]

Я создаю хук локальный и при обработке процедуры, если вызывать функции (правда не все), то вылетает приложение с ошибкой;

function TMyTrackBar.MouseProc(nCode: Integer; wParam: Longint; var MHS: TMouseHookStruct): Longint; stdcall;
var r:Trect;
begin
Result := CallNextHookEx(MouseHook, nCode, wParam, Longint(@MHS));
GetWindowRect(FParentWnd, r); //Например так или
text:=IntToStr(MHS.pt.X); //Здесь тоже, а вот здесь
text:=IntToStr(Mouse.CursorPos.X);// не вылетает
end;


???


 
Cobalt ©   (2003-05-31 10:17) [1]

Функция-хук не должна быть членом класса. Т.е. её надо описывать отдельно от класса.


 
anod ©   (2003-05-31 18:38) [2]

А как мне вызывать функции класса?


 
Song ©   (2003-06-01 10:44) [3]

Не надо TMyTrackBar


 
Vovchik   (2003-06-01 17:54) [4]

Cobalt, ф-ции класса вызывать из другой нити напрямую - не есть корректно. Для этого надо (например) посылать сообщение своей форме из нити, что вот такое-то событие произошло. Тогда форма уже и будет вызывать свои методы.
Можешь посмотреть как сделан метод Synchronize в дельфийном TThread.



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
14-10396
tall
2003-07-16 12:46
2003.08.04
Графика в Paradox.


3-10108
McSimm2
2003-07-14 14:12
2003.08.04
---|Ветка была без названия|---


11-10149
savva
2002-11-29 12:02
2003.08.04
Я тут совершенно недавно подсел на KOL и MCK...


14-10432
mmm
2003-07-17 20:15
2003.08.04
Архангельский - Программирование в Delphi 6


14-10460
Knight
2003-07-17 21:16
2003.08.04
Телефонный справочник - законно ли это?