Главная страница
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.016 c
11-10157
blackalex
2002-12-03 17:39
2003.08.04
Где Кладов?


14-10350
Amid
2003-07-18 11:13
2003.08.04
Как зделать прогу типа WinRoute, WinGate


6-10321
izx
2003-05-27 18:57
2003.08.04
Подключение из программы на Delphi к web серверу через proxy.


3-10102
Alex_x
2003-07-14 13:34
2003.08.04
Немогу програмно установить свойство DataSource датасета


1-10278
Артем К
2003-07-22 02:22
2003.08.04
Как получить длину строки в пикселях