Вниз
Скачать: 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.021 c
1-1089881596
Yakudza
2004-07-15 12:53
2004.08.01
TWebBrowser


1-1090156721
joystick
2004-07-18 17:18
2004.08.01
Как всех послать?


4-1087236670
Nomolos
2004-06-14 22:11
2004.08.01
Адресное пространство процесса


4-1087415989
juiceman
2004-06-16 23:59
2004.08.01
экранная монополия


14-1089663163
KilkennyCat
2004-07-13 00:12
2004.08.01
Блин, пока ехал на работу, мучался вопросом...




   Наверх