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

Вниз

не могу поставить локальную ловушку   Найти похожие ветки 

 
lena19   (2004-06-06 00:18) [0]

всем привет.
не могу поставить локальную ловушку
на скрол в мемо,
народ что я не так делаю ?????

procedure TForm1.Button1Click(Sender: TObject);
begin
 CurrentHook:= setwindowshookex(Wm_Vscroll,@VscrollHook,0,memo1.Handle);
 if currenthook = 0 then
 beep;
end;
-------------------------------------------------------
function VscrollHook(nScrollCode:word; nPos:word; hwndScrollBar:longword): longword; stdcall;
begin
beep;
.....
end;


 
Palladin ©   (2004-06-06 07:38) [1]

ты делаешь не так то, что занимаешься тем в чем ничего не понимаешь. теоретическая подготовка, в виде прочтения литературы на тему что такое ловушки (hooks) и что такое сообщения (messages), может тебя спасти... наверно...


 
lena19   (2004-06-06 12:56) [2]

to palladin
подскажи на какой литературе прокачался до palladin(а)


 
Palladin ©   (2004-06-07 00:01) [3]

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

http://www.podgoretsky.com/ddp.html

что конкретно касается твоего вопроса то Рихтер, тоже у Анатолия на сайте, искать лень, но "он там"...


 
TUser ©   (2004-06-07 06:43) [4]


> setwindowshookex(Wm_Vscroll

WH_MSGFILTER или WM_GETMESSAGE и там уже проверить, что за сообщение было


 
Mim1 ©   (2004-06-07 07:05) [5]

[4] TUser ©   (07.06.04 06:43)
Больше ничего не забыли?


 
akvilon ©   (2004-06-07 17:52) [6]

посмотрите свою предыдущую ветку про скроллинг



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

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

Наверх




Память: 0.48 MB
Время: 0.232 c
3-1087798199
Леван
2004-06-21 10:09
2004.07.18
Курсоры MS SQL и Delphi


3-1088134329
Andrey V.
2004-06-25 07:32
2004.07.18
Разница FieldByName под 1 и 3 диалектами


1-1088709643
Любитель
2004-07-01 23:20
2004.07.18
Как проверить, что в листбоксе закончились записи?


1-1089123691
raul
2004-07-06 18:21
2004.07.18
Internet Explorer и TidHTTPServer


4-1086249279
Yuriy
2004-06-03 11:54
2004.07.18
Работа с почтовым клиентом по-умолчанию