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=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,529481ac2d77d9f6
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!w1g2000hsg.googlegroups.com!not-for-mail
From: gautier_niouzes@hotmail.com
Newsgroups: comp.lang.ada
Subject: Re: Translating a VB dll header to Ada
Date: 12 Apr 2007 04:34:15 -0700
Organization: http://groups.google.com
Message-ID: <1176377655.302629.159560@w1g2000hsg.googlegroups.com>
References: <1176320910.543255.74730@b75g2000hsg.googlegroups.com>
NNTP-Posting-Host: 206.122.158.4
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
X-Trace: posting.google.com 1176377655 4660 127.0.0.1 (12 Apr 2007 11:34:15
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Thu, 12 Apr 2007 11:34:15 +0000 (UTC)
In-Reply-To: <1176320910.543255.74730@b75g2000hsg.googlegroups.com>
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1;
 .NET CLR 2.0.50727; .NET CLR 1.1.4322; InfoPath.1),gzip(gfe),gzip(gfe)
Complaints-To: groups-abuse@google.com
Injection-Info: w1g2000hsg.googlegroups.com; posting-host=206.122.158.4;
   posting-account=CZAoAgwAAAD9ntJQ85OlWL0_Q5EFdzP_
Xref: g2news1.google.com comp.lang.ada:14929
Date: 2007-04-12T04:34:15-07:00
List-Id: <comp.lang.ada>

Did you try GNATCOM for that ?

- For download, you have to look there
  http://www.gnavi.org/source/gnatcom/
or maybe there (although that version seems older)
  http://sourceforge.net/project/showfiles.php?group_id=121876

- Run the install script or at least build /tools/bindcom.adb

- When bindcom is built, run:

bindcom WindowerHelper.dll WindowerHelper

and you have your Ada interface automatically (a set of packages, with
comments etc.)
or an error message if the required information is missing. At least,
it is worth a try...

HTH
G.