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
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,b25b20d0724a5ccc
X-Google-Attributes: gid103376,public
From: "Marc" <marc.lecoq@net-clic.net>
Subject: Re: Ms-dos windows
Date: 2000/11/12
Message-ID: <8un7b7$msq$1@reader1.fr.uu.net>#1/1
X-Deja-AN: 692853387
Content-Transfer-Encoding: 7bit
References: <8uk560$c5c$1@reader1.fr.uu.net> <3A0EBA81.240F986F@acm.org>
X-Priority: 3
Content-Type: text/plain; charset="iso-8859-1"
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400
X-Complaints-To: abuse@fr.uu.net
X-Trace: reader1.fr.uu.net 974069927 23450 212.155.44.27 (12 Nov 2000 22:58:47
 GMT)
Organization: UUNET
X-MSMail-Priority: Normal
Mime-Version: 1.0
NNTP-Posting-Date: 12 Nov 2000 22:58:47 GMT
Newsgroups: comp.lang.ada
Date: 2000-11-12T22:58:47+00:00
List-Id: <comp.lang.ada>

Hello,
Thank you for your response.
First, I'am using GNAT  and ADAGIDE.
In the ADAGIDE window, you can see a green button????
When I push this one (Run), the same as F4  (execute)
a DOS window emulation appears.
I've made a copy from your source, but nothing is coming in this
window.
When I start first a dos window emulation and when I enter
the way to execute my program, there is no problems.
I can see the sentences in the dos window emulation.
Do you have an idea?
Thank you for your help.
Marc.


"Marin David Condic" <mcondic.nospam@acm.org> wrote in message
news:3A0EBA81.240F986F@acm.org...
> It is a little unclear about what you are trying to do. Are you using GNAT
and
> AdaGide? You might try to make a small "Hello World" application as an
> illustration of what you want to do and see if you can get the I/O to work
from
> there. Something like:
>
> with Ada.Text_IO ;
> with Ada.Integer_Text_IO ;
> procedure Hello_World is
>     Int    : Integer ;
> begin
>     Ada.Text_IO.Put_Line ("Hello World!") ;
>     Ada.Text_IO.Put ("Enter An Integer: ") ;
>     Ada.Integer_Text_IO.Get (Int) ;
>     Ada.Text_IO.Put_Line ("Your Number + 10 Is: " & Integer'Image (Int +
10)) ;
> end Hello_World ;
>
> Try that and see if it works.
>
> MDC
>
>
> Marc wrote:
>
> > Hello,
> > I'm new in ada,
> > when I execute my program from ada environment,(Execute option) a dos
window
> > appears but nothing append inside. Why???
> > I use Put and Get statements.
> > Thank for your answer
> > (Ada 3.12 for windows)
>
> --
> ======================================================================
> Marin David Condic - Quadrus Corporation - http://www.quadruscorp.com/
> Send Replies To: m c o n d i c @ q u a d r u s c o r p . c o m
> Visit my web site at:  http://www.mcondic.com/
>
>     "Giving money and power to Government is like giving whiskey
>     and car keys to teenage boys."
>
>         --   P. J. O'Rourke
> ======================================================================
>
>