Вниз
Скачать: CL | DM;

Как все-таки выйти из цикла, если форма не в фокусе?   Найти похожие ветки 

← →
cvg   (2004-07-20 08:42) [0]

Сабж. Спасибо всем, кто отвечал мне ранее, но выявилось, почему не срабатывает: оказывается, форма у меня не в фокусе, и это принципиально. В одной умной книжке по Delphi 6 я нашел (после того, как мне это подсказали), что вроде бы решить проблему можно, ориентируясь на системные сообщения, но как это реализовать конкретно -- тут я полный пас. Ибо чайник.

На всякий случай привожу еще раз, как у меня сейчас реализован выход из цикла:


repeat
...
until f;

procedure TMainForm.FormKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
f := Key = VK_F2;
end;


← →
CHES ©   (2004-07-20 08:45) [1]

При таком подходе только глобальный хук на клавиатуру


← →
Думкин ©   (2004-07-20 08:47) [2]

Вопрос кривой.
А что у тебя в фокусе? Что мешает перед запуском цикла передать фокус форме?


← →
cvg   (2004-07-20 08:57) [3]

А дело в том, что прога грабит данные с экрана. Кнопка останова-то в принципе видна, но при нажатии на нее, соответственно, в фокусе всякая фигня получается.


← →
Reindeer Moss Eater ©   (2004-07-20 09:04) [4]

А зачем кнопка?

Горячих клавиш не хватает?


← →
cvg   (2004-07-20 09:25) [5]

Кнопка осталась с тех времен, когда я гонял ее в отладочном режиме, когда инфу она тянула из файла. А горячую клавишу -- в этом-то, стобственно, и вопрос: как сделать?


← →
Sun bittern ©   (2004-07-20 09:29) [6]

CHES ©   (20.07.04 08:45) [1]


← →
cvg   (2004-07-20 09:34) [7]

Но можно ж как-то системные сообщения перехватывать... Там в книжке было что-то типа OnMessage ... ... и т.п. Но преувеличением будет сказать, что я все понял. И еще бОльшим преувеличением -- что я смогу переделать это под себя. Ж:(((


← →
Sun bittern ©   (2004-07-20 09:36) [8]

Поищи в статьях или в факе про хуки. Если память не изменяет, что то там похожее было.


← →
cvg   (2004-07-20 09:39) [9]

А ссылочку какую-нить подкинь. Или хоть по каким словам искать? И вообше, на великом и могучем есть или сразу только на английском искать?


← →
Sun bittern ©   (2004-07-20 09:42) [10]

Там выше ссылочка на поиск есть "Поиск". Где искать - статьи. Искомое слово Хук.


← →
CHES ©   (2004-07-20 09:55) [11]

http://msk.nestor.minsk.by/kg/2003/26/kg32602.html


← →
cvg   (2004-07-20 11:08) [12]

Вот спасибо, это ближе к теме. А то я, пытаясь разобраться в предыдущих примерах к статье по хукам уже практически припух.



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.02 c
14-1089970421
ghg
2004-07-16 13:33
2004.08.01
где инфа про компонент TShellTreeView


1-1089805982
NJoe
2004-07-14 15:53
2004.08.01
потоки и записи


8-1084647905
Agent[007]
2004-05-15 23:05
2004.08.01
MP3 в API


14-1089575863
Ломброзо
2004-07-11 23:57
2004.08.01
Смотрите, что втихаря творят


4-1087048261
Игорь
2004-06-12 17:51
2004.08.01
Перехват открытия файлов




   Наверх