Автор Тема: Windows API и perl  (Прочитано 2353 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Evgeny

  • Фанат форума
  • Старожил
  • ****
  • Сообщений: 272
  • +0/-0
  • 0
    • Просмотр профиля
Windows API и perl
« : 09 Июля 2002, 17:07:43 »
Привет всем.
Мой перл скрипт запускает одну программу. В STDIN или STDERROR программа ничего не пишет.
Если всё правильно отработало - на несколько секунд появляется Windows окно и его MessageBox, потом всё само закрывается.
Если же произошла ошибка - появляется это же окно, но с другим MessageBox\'ом - сообщением об ошибке и не закрывается.
Как можно проанализировать эту ситуацию на Перле (если это конечно можно) и в случае ошибки закрыть эти окна.
На С++ Builder\'e я бы использовал SendMessage. Есть ли аналог этой ф-ции в Перл или какая-нибудь другая возможность управления окнами Windows.
Большое спасибо.

Оффлайн Chs

  • Perl программер
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 1108
  • +0/-0
  • 2
    • Просмотр профиля
    • http://chs.now.at/
Windows API и perl
« Ответ #1 : 09 Июля 2002, 19:58:50 »
perldoc Win32::Process
2B OR NOT 2B = FF

Оффлайн Evgeny

  • Фанат форума
  • Старожил
  • ****
  • Сообщений: 272
  • +0/-0
  • 0
    • Просмотр профиля
Windows API и perl
« Ответ #2 : 10 Июля 2002, 12:40:15 »
Цитировать
perldoc Win32::Process

Понятно, как создать процесс, приостановить, убить.
Но вот как определить, например, имеет ли сейчас процесс видимое windows-окно? Или как прочитать текст с MessageBox\'a?
На С++ Builder\'e я такое делал. Ф-ция называлась SendMessage. А вот как такое на Перле реализовать?

Оффлайн Evgeny

  • Фанат форума
  • Старожил
  • ****
  • Сообщений: 272
  • +0/-0
  • 0
    • Просмотр профиля
Windows API и perl
« Ответ #3 : 11 Июля 2002, 17:38:24 »
Кстати не работает этот модуть под W2K.
ProcessID неправильное возвращает и убить процесс не может.

 

Sitemap 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