Вниз
Скачать: 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.022 c
8-1084513790
alienserg
2004-05-14 09:49
2004.08.01
сжатие аудиопотока налету.


14-1089465018
VID
2004-07-10 17:10
2004.08.01
Как поднастроить файрвол (ZoneAlarm 4.5.538.001)


1-1089803621
Sparrow
2004-07-14 15:13
2004.08.01
как получить инфу о версии офиса на уровне прекомпилятора?


14-1089951401
КаПиБаРа
2004-07-16 08:16
2004.08.01
Щас маненько еще поработаю и в отпуск


8-1084805967
Uran
2004-05-17 18:59
2004.08.01
Ошибка при вставке jpg




   Наверх