Re: Translating a VB dll header to Ada

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On 13 Apr 2007 08:25:29 -0700, vienapl@hotmail.com wrote:

> I posted this once already, but after several hours it seems to not
> show up, so I'm posting it again.
> 
> Thank you for the parameter corrections, I edited them, but the
> problem persists.
> 
> I'm quite sure I'm not using the API in a wrong manner, here is a C++
> example of how it should be used: http://pastebin.ca/437367 and here a
> VB6 one: http://pastebin.ca/437369 .

Well, C++ uses the class instead of plain functions.

It is possible to make bindings to C++ classes. GNAT has pragmas for that.

> This thing is getting me really confused. Would some debug information
> help?

Yes. You can try to determine where exactly it crashes by inspecting the
stack. You can also check the stack frames to ensure that the call
convention is respected.

But first, is it CTHSetLocation which makes troubles or other procedures as
well? If you commented that call out, would the rest crash?

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de