|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander 2:5020/400 18 Jan 2002 19:17:17 To : All Subject : Win32::Setupsup -------------------------------------------------------------------------------- Кто подскажет где я протупил? В программе ?1, написанной при помощи Тк указываю привязку к событию: $mw->bind('<t>' => \&opn); Проверяю - работает. В программе ?2 при помощи Win32::Setupsup::EnumWindows(\@windowlist); определяю дескриптор окна программы ?1. Затем в ней же при помощи $wind=<STDIN>; #ввожу этот дескриптор chomp ($wind); $sig="t"; $act = '0'; Win32::Setupsup::SendKeys($wind, $sig, $act); посылаю (это я так думаю) "t" окну программы ?1. Hу и никакой реакции. Похоже, что меня кто-то где-то обманывает. Спасибо за подсказку. Кстати, делается в Винде2000 и для нее же. = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = Hаписал я это и подождал отправлять, а еще поэкспериментировал. Первый посыл "t" попадает в STDOUT программы ?2, а не туда куда надо. Зато второй и последующие посылы попадают туда куда надо, но только если окно программы ?1 развернуто, а если свернуто, то посылы отлично срабатывают по дочерним окнам. Hо опять же только вторые. Какой-то бред! Кто-нибудь что-либо понимает? В принципе мне не трудно стрелять по дочерним окнам (хоть по всем). Hо какого первый посыл "t" попадает в STDOUT и как с этим бороться? --- ifmail v.2.15dev5 * Origin: DS (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/842854aaef87.html, оценка из 5, голосов 10
|