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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,f95357b07ebf392d,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 1995-03-21 10:32:48 PST
Path: 
 nntp.gmd.de!news.rwth-aachen.de!news.rhrz.uni-bonn.de!news.uni-stuttgart.de!rz.uni-karlsruhe.de!xlink.net!howland.reston.ans.net!news.cac.psu.edu!news.pop.psu.edu!hudson.lm.com!newsfeed.pitt.edu!uunet!news.intersource.com!news.intersource.com!not-for-mail
From: charliel@ansel.intersource.com (Charlie Lenahan)
Newsgroups: comp.lang.ada
Subject: Windows Programming With ActiveAda for Win32s
Date: 21 Mar 1995 13:32:48 -0500
Organization: none
Message-ID: <3kn64g$209@ansel.intersource.com>
NNTP-Posting-Host: ansel.intersource.com
Date: 1995-03-21T13:32:48-05:00
List-Id: <comp.lang.ada>

We are trying to Use ActiveAda for Windows 5.1.3 to Create a Dialog Box. 
Regular Windows Programming you must use a call to MakeProcINstance before you
call CreateDialog(). How do you Get around this by using the address of the 
callback function for that dialog box.

Inst:Handle:=GetModuleHandle(C_NULL);

DlgHnd:Hwnd;

Dlgproc:lpvoid:=package.dlg_proc'address;

prt : hwnd;

begin

prt := CreateWindowEx();

dlghnd := CreateDialog(inst, CString("dialog_name"), prt, Convert(DlgProc));

...

end;

.rc file ...
DIALOG dialog_name ...

This is the general concept we have been attempting.  The dlghnd is not created
and a call to GetLastError returns 87 - Invalid Parameter.  What are we doing wrong???