Главная страница
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.017 c
14-10437
Дима
2003-07-18 08:29
2003.08.04
Дельфи для начинающих


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


1-10208
Prov
2003-07-22 09:21
2003.08.04
Фон едита и цвет текста


4-10505
nstyx
2003-05-30 00:09
2003.08.04
картинку на форму


14-10394
frost
2003-07-11 22:53
2003.08.04
Базы Paradox и различные файловые системы