Добрый день.

Пытаюсь научиться пользоваться Win32::Api. Но чего то ничего не выходит. Раздобыл доки на win32api
нашел в них функцию попроще.
вот такую (выдернул из справочника Win32api)

**********
Функция SwapMouseButton
 Описание:
 function SwapMouseButton(Swap: Bool): Bool
Изменяет на обpатное или восстанавливает назначение левой и пpавой кнопок мыши в соответствии со значением Swap.
Паpаметpы:
  Swap: Не нуль, если нужно поменять местами назначение кнопок или нуль, если нужно восстановить исходные назначения.
 Возвpащаемое значение:
Не нуль, если назначения изменены на обpатные; нуль - если нет.
 функция находится в файле user32.dll
**********

пытаюсь теперь из perl переключить клавиши мыши. вот таким вот образом.



Что делает $function вроде понятно. При помощи модуля Win32::Api вызывает внешнюю функцию.
Но непонятно зачем $return?

Ну и весь код не рабочий получился. Пишет 
что
"...Undefined subroutine  &main::SwapMouseButton..."

Может справочник по API г...   и такой функции в API дествительно нет, может руки кривые и голова тоже. но не получается.

Пожалуйста приведите пример использования модуля Win32::Api, чтоб он чего нибудь простенькое при помощи функций Win32API делал. Ну например время узнавал, ну или кнопки мыши переключал, как я пытался сделать или может еще чего .


Спасибо.

Для начала попробуйте почитать мануал повнимательнее и сравните свой код с этим




Если не замечаете, подсказки:

1. кавычки
2. параметры функции

Вот исправленный код.

Вот небольшой кусок из моего скрипта, если поможет:

Это немного другой способ, в отличие от того, который указал shamber. Но оба работают и описаны в документации.

Это сообщение отредактировал(а) KSURi - 22.11.2007, 17:41

Большое спасибо за ответы.

В принципе я попробовал, понял, что модуль работает. Правда он выдает какие то ошибки, (я пробовал с  функцией, которая переключает клавиши мыши туда-сюда). Но клавиши при этом ПЕРЕКЛЮЧАЮТСЯ. Что меня вполне удовлетворило .

но теперь вопросов еще больше... .

Вот например. Функция
my $FindWindow  = Win32::API -> Import('user32',
                                       'HWND FindWindow(LPCTSTR lpClassName, LPCTSTR lpWindowName)');

требует параметрами имя класса, и имя окна. Мне допустим, нужно закрыть окно интернет-эксплойера. Как узнать (в каких справочниках это написано?) какого класса это окно и какое у него имя?

Ну по последнему примеру у понял, что закрыть его можно функцией SendMessage . 

А какой функцией можно воспользоваться, чтобы получился аналог - "открыть текстовый файл". Ну чтобы не закрывать окно каждый раз, а только чтобы текст в окне эксплоера менялся?

Спасибо.

И еще вопросик от начинающего (и запутавшегося).

читаю вот всякую литературу, в которой написано примерно следующее.
Что мол, каждый язык программирования, конечно заточен для своих нужд, ну т.е. в Perl (например, очень удобно работать со строками) а для C++ уже написаны куча классов, которыми бери и пользуйся, не надо сочинять свои. вот кстати и WINAPI тоже вроде как на С++ написаны.

Ну и тут же я читаю, что в принципе на любом языке (будь то перл или Си) можно написать все что угодно. (в принципе модуль ТК для перл и подтверждает то, что вот можно и окошки рисовать).

Ну а как это все самому написать? 
Вот например (отбросим окна - там все сложнее). Ну вот обыкновенная консоль.
Хочу чтобы вывод в нее осуществлялся зеленым цветом. Как это сделать не используя модули ?
как самому описать то, что вывод на консоль осуществлять зеленым цветом?

Какую книгу не откроешь - там переменные, массивы да циклы + набор уже написанных функций. Все.
Но это же уже укрупненные структуры. Смотрел на модуль Win32::Console - там к этому модулю еще идут и console.dll, console.ext. Про DLL в книгах про перл чего то вообще не пишут (или не там читаю?). Как средствами перл написать DLL?

Опишите пожалуйста эту "вертикаль" - от зеленых букв в консоли до того как это описать.
На чем написан сам Перл?...

Чего то никак я структуру от красивого оконного интерфейса до машинного кода понять не могу...
может чего почитать посоветуете?

Уважаемый
burakov, 
по поводу ваших впоросов, аля Ну а как это все самому написать? 
Вам уже давно дали дельный совет. Читайте литературу..... чем больше тем лучше. и задавайте конкретные вопросы.
А так вы ничего не добьетесь ИМХО.

На счет литературы я согласен.
За некорректные вопросы я извиняюсь... (попытка не пытка)...

Вопрос какую литературу читать???
Так можно всю жизнь читать, читать и вовсе не понять, то чего хочется узнать ... Тем более что хочется читать по-русски . (так пытаясь выстроить свою "вертикаль" от окошек к машинным кодам - я зашел на intuit.ru и попытался почитать про архитектуру и принцип работы ЭВМ. Так там меня как спусили в регистры, прерывания... чуть голову не снесло). 

Поэтому хочется читать еще и эффективно... 
В какой книге по перл описано создание DLL на перл?


Еще раз извиняюсь за свои некорректные вопросы.

Всем спасибо. .

Есть много программ, позволяющих узнавать служебную информацию об окнах. Одна из таких, WindowSpy вроде, если память не изменяет, входит в поставку Microsoft Visual Studio.

Привет

Цитата

Чего то никак я структуру от красивого оконного интерфейса до машинного кода понять не могу...

Думаю, ты не с того конца начал.
На перле можно много чего сделать.
Но написание приложений под винапи, по-моему, уже изыск. Так же, как и написание пользовательского ГУИ средствами ТК.
Есть более удобные средства для этого.
Это мое мнение и просьба сильно не бить.

Могу посоветовать книгу Т. Кристиансена и Н. Торкингтона "Perl: библиотека программиста".
Там есть рецепт по выводу на консоль другим цветом. Не уверен, правда, что этот модуль реализован для Windows.

Не очень понятно желание писать без модулей. Для успешного использования устройства ведь необязательно писать собственный драйвер.


Это сообщение отредактировал(а) aksined - 5.12.2007, 18:31