From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,4d1b41004c1d217c
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!x23g2000vba.googlegroups.com!not-for-mail
From: tolkamp <f.tolkamp@gmail.com>
Newsgroups: comp.lang.ada
Subject: Re: How to interface in ADA with Microsoft joystick?
Date: Sun, 10 Oct 2010 04:05:51 -0700 (PDT)
Organization: http://groups.google.com
Message-ID: 
 <f8b20345-151a-4970-acc9-053606a41bfb@x23g2000vba.googlegroups.com>
References: 
 <2edbcdab-8ff5-40e6-9ac0-44be6cb93621@m15g2000yqm.googlegroups.com>
 <1ne6iis0we6lt.7ftiqb64g582.dlg@40tude.net>
 <04cf664d-62bd-4e2e-8aaa-cd4654ea327e@26g2000yqv.googlegroups.com>
 <tn3y90yxx4hy$.vlschw9qns6r$.dlg@40tude.net>
 <db2d2622-ead5-4b79-8dcb-f88d2a703ac9@e14g2000yqe.googlegroups.com>
 <1cd6pmbvbsnkb$.uwz2048291is.dlg@40tude.net>
 <f29d10d3-2cd5-477f-b8d5-c9c9ab47082e@30g2000yqm.googlegroups.com>
 <3a82f59a-129f-46b1-bd0c-eae124136590@26g2000yqv.googlegroups.com>
 <zxdah2dl84in$.1f64fdn0htb1m$.dlg@40tude.net>
 <f5f1d30a-a7d5-4acb-8c3c-1a26d8e2a0bb@28g2000yqm.googlegroups.com>
 <h1a3x95l249h.15l5y1aqekwdt.dlg@40tude.net>
 <0402e3f7-151c-4a51-bd61-44f4fc32a9d1@l20g2000yqm.googlegroups.com>
 <1thnsl7r3l217.1g1mvpwzjokvr.dlg@40tude.net>
 <bd8d62ef-2403-4eee-937f-2b1cd1bd435a@g8g2000yqa.googlegroups.com>
 <tu0299qu7wzb.kwz3ru9weav$.dlg@40tude.net>
NNTP-Posting-Host: 62.163.210.190
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Trace: posting.google.com 1286708751 10457 127.0.0.1 (10 Oct 2010 11:05:51
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Sun, 10 Oct 2010 11:05:51 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: x23g2000vba.googlegroups.com; posting-host=62.163.210.190;
 posting-account=nZAcngoAAACcfYM9wDw3w9Z1XR3bObfs
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64;
 Trident/4.0; GTB6.5; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR
 3.0.30729; Media Center PC 6.0; InfoPath.1; .NET4.0C),gzip(gfe)
Xref: g2news1.google.com comp.lang.ada:14471
Date: 2010-10-10T04:05:51-07:00
List-Id: <comp.lang.ada>

On 8 okt, 22:00, "Dmitry A. Kazakov" <mail...@dmitry-kazakov.de>
wrote:
> On Fri, 8 Oct 2010 01:48:54 -0700 (PDT), tolkamp wrote:
> > On this websitehttp://www.adapower.com/index.php?Command=Class&ClassID=Bindings&CID=388
> > I found the package Win32.Joystick. Is this package usable to add to
> > my project?
>
> I see no problem why not.
>
> (I have no idea why win32.mmsystem still does not contain it. Maybe,
> because it wasn't supported under NT 4.0?)
>
> --
> Regards,
> Dmitry A. Kazakovhttp://www.dmitry-kazakov.de

I have added the joystick package from the above mentioned website to
win32.mmsystem.ads
After compilation the next error message occurs:
operator for type "Interfaces.C.unsigned_long" is not directly
visable, use clause would make operation legal.

The error message points to this code:
JOY_RETURNALL      : constant Win32.DWORD               -- mmsystem.h:
2067
      := ( JOY_RETURNX or JOY_RETURNY or JOY_RETURNZ   or JOY_RETURNR
            or JOY_RETURNU or JOY_RETURNV or JOY_RETURNPOV or
JOY_RETURNBUTTONS ) ;

I do not understand for which package a use clause must be added.