Forum Webscript.Ru
Программирование => Perl => Тема начата: nankko от 22 Февраля 2008, 17:01:56
-
Помомгите плз раобратся с guitest.
Интересует работа MouseClick
например, хочу открыть в вин каклькулятор и нажать 5..
#!/usr/bin/perl -w
use strict;
use Win32::GuiTest qw(PushButton FindWindowLike SetForegroundWindow SendKeys WaitWindow IsWindow IsWindowVisible MouseClick);
system("start calc.exe");
my @windows = WaitWindow("Calculator");
die unless scalar @windows == 1 && IsWindow($windows[0]);
SetForegroundWindow($windows[0]);
MouseClick("",$windows[0],298,168,\'{LEFT}\',0.5);
координаты для инжинерного вида)))
что не так?!
заранее спс
-
Я не знаю данного модуля, да и винды у меня нет. Но на мой взгляд использование координат для нажимания кнопок не самая лучшая идея. Посмотрите, может есть модуль который может работать с АйДи, как это умеют делать тестовые тулы.
-
нет, с ID непоможет... нужнен именно этот модуль! нет идей?! + именно эта ф-ия!
-
немнога флуда )... если нада из скрипта клики мышой делать как вариант могу дать оч маленькую прогу которую какраз для этого недавно написал ) там еще и других ф-ций полезных хватает типа перемещать курсор плавно или мгновенно и тп
-
спс конечно,но мну тересует именно guitest,но буду благодарен если кинешь nankko@gmail.com
-
проверь мыло..
исходник и ридми.тхт прилогаюца )
ЗЫ не бота для игрушки случайно сделать собрался? ) если эта игра WOW забудь ... меня за это там и забанили )