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,b93a9fb8d98788f1,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-11-16 12:07:04 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!nntp.cs.ubc.ca!fu-berlin.de!uni-berlin.de!pd95185be.dip.t-dialin.NET!not-for-mail
From: Bjoern Schiessle <devnull@schiessle.org>
Newsgroups: comp.lang.ada
Subject: read filename and then open text file
Date: Sat, 16 Nov 2002 21:07:01 +0100
Message-ID: <pan.2002.11.16.21.07.01.344604.1124@schiessle.org>
NNTP-Posting-Host: pd95185be.dip.t-dialin.net (217.81.133.190)
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: fu-berlin.de 1037477222 16106506 217.81.133.190 (16 [117782])
X-Orig-Path: not-for-mail
User-Agent: Pan/0.11.2 (Unix)
X-Comment-To: ALL
Xref: archiver1.google.com comp.lang.ada:30986
Date: 2002-11-16T21:07:01+01:00
List-Id: <comp.lang.ada>

Hello,
I am an Ada beginner and try do read a filename and then open the file,
but it doesn't work.

I have tried this:

with Ada.Text_IO;
with Ada.Strings.Unbounded;
with Ada.Strings.Unbounded.Text_IO;
use Ada.Text_IO;
use Ada.Strings.Unbounded;
use Ada.Strings.Unbounded.Text_IO;

procedure test is
   file : File_Type;
   filename : Unbounded_String;
begin
   Put_line("Geben Sie das zu erratende Wort ein (nur grossbuchstaben):");
   Put(">");
   Wort := Get_Line;
   Open(Datei, In_File, Dateiname);
   ...

but it doesn't work. I get the message:

expected type "Standard.String"
found private type "Ada.Strings.Unbounded.Unbounded_String"

I have no idea how i must read the filename. Can someone help me?

Thanks a lot
Bjoern