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.3 required=5.0 tests=BAYES_00,INVALID_MSGID,
	WEIRD_PORT autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,42a73596a854a4d
X-Google-Attributes: gid103376,public
From: Niklas Holsti <nholsti@icon.fi>
Subject: Re: non-visible declaration...error
Date: 1999/11/26
Message-ID: <383F11E1.B59C277F@icon.fi>#1/1
X-Deja-AN: 553450074
Content-Transfer-Encoding: 7bit
References: <383EE59D.6691E0F8@hrz.tu-chemnitz.de>
Content-Type: text/plain; charset=us-ascii
X-Trace: read2.inet.fi 943655804 194.252.1.158 (Sat, 27 Nov 1999 00:36:44 EET)
Organization: Space Systems Finland Ltd
MIME-Version: 1.0
NNTP-Posting-Date: Sat, 27 Nov 1999 00:36:44 EET
Newsgroups: comp.lang.ada
Date: 1999-11-26T00:00:00+00:00
List-Id: <comp.lang.ada>

andi wrote:
> 
> I would compile these rows an I became an error:
>   "wglCreateContext" is not visible
>   non-visible declaration at win32-wingdi.ads:9157
>   "wglMakeCurrent" is not visible
>   non-visible declaration at win32-wingdi.ads:9179

Those subprograms are declared in other packages that you
have (correctly) "withed", but since you haven't given "use"
clauses for these packages, the subprograms are not directly
visible; you must specify both the package name and the subprogram
name when calling the subprogram.

> Hmm... I use the GNAT for WinNT - Compiler 3.12 with the
> win32ada-binding
> 
> Here the code:
> 
>   with System;
>   with Win32.Windef;
>   with Win32.Winuser;
>   with Win32.Winmain;
>   with Win32.Wingdi;
> 
>   procedure prog is
>   -- some Var. and const
>   begin
>   -- Window creating things(handler,...)
> 
>   -- OpenGl-init
>      RC := wglCreateContext(hInst);

Try    RC := Win32.Wingdi.wglCreateContext(hInst);

>      wglMakeCurrent(hInst,RC);

Try    Win32.Wingdi.wglMakeCurrent(hInst,RC);

> 
>   -- some others
>   end prog;
> 
> What can I do ???

Either prefix each subprogram name with the package it comes
from, or add "use" clauses, for example

   use Win32.Wingdi;

> 
> Thanx
> andi

Hope it helps -- I haven't used Win32 myself, yet.

Niklas