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=2.3 required=5.0 tests=BAYES_00,HK_RANDOM_FROM,
	INVALID_MSGID,MSGID_RANDY autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,d2a7ab292898908a,start
X-Google-Attributes: gid103376,public
From: czgrr <czgrr@my-dejanews.com>
Subject: Importing calls to access Windows registry
Date: 1999/05/07
Message-ID: <7gulm9$20b$1@nnrp1.deja.com>#1/1
X-Deja-AN: 475120095
X-Http-Proxy: 1.0 x11.dejanews.com:80 (Squid/1.1.22) for client 193.192.234.4
Organization: Deja News - The Leader in Internet Discussion
X-Article-Creation-Date: Fri May 07 12:18:20 1999 GMT
Newsgroups: comp.lang.ada
X-Http-User-Agent: Mozilla/4.0 (compatible; MSIE 4.01; Windows NT)
Date: 1999-05-07T00:00:00+00:00
List-Id: <comp.lang.ada>

Hello everybody, my turn to ask a question.

I am using ObjectAda 7.1.1 on Windows NT 4.0. I am trying to access the
registry, but I am coming across link errors which I have not been able to
fix. Something obvious, I expect, but just not to me! This was based on code
from a Windows 95 application in ActivAda (83) which works.

I only have Ada83 experience, so please let me know if anything you might
provide in a solution is only available in Ada95, or only in ObjectAda AFAYK.

I am doing this for one of a few functions I want...

  TYPE windows_integer_type IS RANGE -2**31 .. ( 2**31 - 1 ) ;
  FOR windows_integer_type'SIZE USE 32 ;

  TYPE string_pointer_type         IS ACCESS STRING ;
  TYPE string_pointer_pointer_type IS ACCESS string_pointer_type ;

  FUNCTION RegOpenKey
             ( key         :        SYSTEM.ADDRESS ;               -- IN
               subkey      :        STRING ;                       -- IN
               key_address :        string_pointer_pointer_type )  -- OUT
                             RETURN windows_integer_type ;
  PRAGMA IMPORT ( WIN32, RegOpenKey ) ;

but I get the following link error...

registry_server.obj : error LNK2001: unresolved external symbol _RegOpenKey@12

What am I doing wrong?

Cheers in advance,
czgrr

--
No email, please - reply to the newsgroup. Email may be made public.
My opinions are not necessarily those of my employer.
My suggestions might not be correct. Use at your own risk.

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own