Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
 
EEjester
1 / 1 / 0
Регистрация: 28.03.2013
Сообщений: 299
#1

Отследить появление окна об информации подключения - Delphi

12.03.2015, 21:00. Просмотров 1254. Ответов 36
Метки нет (Все метки)

На модеме в случае потере связи появляется окно в котором спрашивается хотите ли вы восстановить подключение.
Жутко это бесит!! Нужно перехватить появление этого сообщения.
Пробовал в таймере вот так но это жуткое извращение! и когда играешь например то сворачивается игра!!! БЕСИТ!
Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure qwe1;
var
  H1:hwnd;
begin
  H1 := FindWindow(nil, 'Communication has been lost!');
  if H1 <> 0 then
   begin
    EmulateKey(H1, VK_RETURN);
    Exit;
   end;
end;
Можно ли как то без таймера отловить появление окна?

Добавлено через 23 часа 51 минуту
UP!!! нужна помощь! люди!!!

Добавлено через 4 часа 31 минуту
нашел вот такое:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
var
  FuckEdrawHook: HHOOK;
 
function FuckEdrawProc(nCode: Integer; WParam, LParam: Longint): Longint; stdcall;
const
  STR_EVALUATION = 'Evaluation Version Reminder';
var
  P: PChar;
  Cpt: string;
begin
  if nCode = HCBT_CREATEWND then
  begin
    P := CBT_CREATEWND(Pointer(lParam)^).lpcs^.lpszName;
    if Assigned(P) then
    begin
      Cpt := StrPas(P);
      if Pos(STR_EVALUATION, Cpt) > 0 then
      begin
        Result := 1; 
        Exit
      end
    end
  end;
  Result := CallNextHookEx(FuckEdrawHook, nCode, WParam, LParam)
end;
 
initialization
 
FuckEdrawHook := SetWindowsHookEx(WH_CBT, FuckEdrawProc, 0, GetCurrentThreadID);
 
finalization
 
if FuckEdrawHook <> 0 then
  UnHookWindowsHookEx(FuckEdrawHook);
кто нить объяснит как пользоваться?

Добавлено через 11 часов 47 минут
Тему вверх! Прошу помощи!

Добавлено через 11 часов 38 минут
up! помогите!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.03.2015, 21:00
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Отследить появление окна об информации подключения (Delphi):

Появление окна - Delphi
Что мне надо сделать чтобы в одной форме нажал на кнопку и потом появилось вторая форма?

Постепенное появление окна. - Delphi
Добрый день! В прогу нужно вставить эффект постепенного закрытия окна с прозрачностью. Как сделать открытие окна с постепенным появлением,...

Плавное появление окна - Delphi
Подскажите пожалуйста код плавного появления окна при загрузке программы.

В момент выхода из программы обеспечьте появление окна для сохранения файла с данными - Delphi
В момент выхода из программы обеспечьте появление окна для сохранения файла с данными, если в него были внесены изменения. Данные...

Передача информации в окна - Delphi
День добрый. Задача: В создаваемой мною оболочке вводится текст, с определенной частотой я должен считывать этот текст и отправлять его,...

Чтение информации из чужого окна в 64-bit OS - Delphi
Привет! Процедура проверяет открыто ли окно Диспетчера задач, и если открыто - считывает из него список процессов в мой Memo1. Процедура...

36
mss
2599 / 2255 / 250
Регистрация: 24.12.2010
Сообщений: 13,725
13.03.2015, 12:14 #31
Цитата Сообщение от EEjester Посмотреть сообщение
Потому что я пробовал ..написать..не работает
Так у тебя и хук тоже не работает)

При прочих равных условиях почему бы не сосредоточиться на углубленном изучении проблем при реализации нормального решения (прямой доступ к модему через RAS API), а не решения через ж. (ловля хуками окон) ?

Добавлено через 4 минуты
Цитата Сообщение от EEjester Посмотреть сообщение
другие проги для других мадемов
А ты случаем не пробовал выкручивать накидным 6-гранным ключем на 32 утопленные саморезы с крестообразным шлицом ?)
Попробуй - это как раз тот самый случай)
0
EEjester
1 / 1 / 0
Регистрация: 28.03.2013
Сообщений: 299
13.03.2015, 12:29  [ТС] #32
Всем спасибо! Тема закрыта. Выбросил мадем на помойку.
0
serg55
2 / 2 / 1
Регистрация: 15.08.2014
Сообщений: 170
13.03.2015, 16:07 #33
Цитата Сообщение от EEjester Посмотреть сообщение
проще перехвотить это ссаное окно!
Ухаааха ... неееееееее.....алгоритма перехвата ссаного окна нет )) ... есть только алгоритм перехвата обычного
Шутка

Добавлено через 3 минуты
Цитата Сообщение от mss Посмотреть сообщение
А ты случаем не пробовал выкручивать накидным 6-гранным ключем на 32 утопленные саморезы с крестообразным шлицом ?)
Попробуй - это как раз тот самый случай)
Йаахаааахаааатаааалллл ))))))) Самая смешная тема. В конце рабочего дня самое то
0
Verevkin
214 / 275 / 61
Регистрация: 12.03.2015
Сообщений: 2,217
13.03.2015, 16:12 #34
Цитата Сообщение от serg55 Посмотреть сообщение
Йаахаааахаааатаааалллл ))))))) Самая смешная тема. В конце рабочего дня самое то

Не по теме:

это смешная тема?! я тя умоляю. хошь ссылку на холиварчик небольшой? его народ на цитаты растащил, мне сказали.

0
mss
13.03.2015, 16:24
  #35

Не по теме:

Цитата Сообщение от serg55 Посмотреть сообщение
Самая смешная тема
Грустная это тема.
Не самая, но наводит на грустные размышления - об инженерах, об их адекватности, об уровне их общей грамотности, знаний, подготовки

0
serg55
2 / 2 / 1
Регистрация: 15.08.2014
Сообщений: 170
13.03.2015, 16:28 #36
Цитата Сообщение от Verevkin Посмотреть сообщение
хошь ссылку на холиварчик небольшой?
кидай

Добавлено через 2 минуты
Цитата Сообщение от mss Посмотреть сообщение
об инженерах, об их адекватности, об уровне их общей грамотности, знаний, подготовки
Да уж. Нужно соответствующую "политику" вести среди молодежи. Кто сейчас читает журналы радио. Да никто, сидят в контактах, онлайнах (эт я не про форум ).
0
Verevkin
214 / 275 / 61
Регистрация: 12.03.2015
Сообщений: 2,217
13.03.2015, 16:55 #37
Цитата Сообщение от serg55 Посмотреть сообщение
кидай
поискал, ссылку нашёл, но увы, форум дохлый.
есть сайты, хранящие состояния других сайтов, можно поискать снимок. время действия - начало осени 2013.
поищи, оно того стоит!
0
13.03.2015, 16:55
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.03.2015, 16:55
Привет! Вот еще темы с ответами:

Отследить появление DOM - JavaScript
Можно ли сделать так, чтобы при появлении (т.е. загрузке браузером, не при создании скриптом) DOM с определённым классом или id выполнялась...

Плавное появление и исчезание формы, отследить коэффициент прозрачности - Visual Basic .NET
В чем ошибка? При запуске программы она просто плавно исчезает, но не появляется обратно. Я думаю что из за того, что не правильно прописан...

Отследить появление файла по указанному пути и анализ его байтовой структуры - Visual Basic
Всем здравствуйте. Необходимо отслеживать файл, зная указанный путь??? Вроде как через функцию DIR, как точно не пойму... После того...

Отследить ошибку подключения модуля - C#
Здравствуйте! Использую в своей программе MySQL Connector. Если использую программу на компьютере где не установлен коннектор, то...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
37
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru