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,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 2002:a24:7bd2:: with SMTP id
 q201-v6mr12542915itc.52.1534423922296;
        Thu, 16 Aug 2018 05:52:02 -0700 (PDT)
X-Received: by 2002:aca:2b06:: with SMTP id i6-v6mr824141oik.0.1534423922079;
 Thu, 16 Aug 2018 05:52:02 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!news.gegeweb.eu!gegeweb.org!news.redatomik.org!newsfeed.xs4all.nl!newsfeed7.news.xs4all.nl!85.12.16.70.MISMATCH!peer03.ams1!peer.ams1.xlned.com!news.xlned.com!peer03.am4!peer.am4.highwinds-media.com!peer01.iad!feed-me.highwinds-media.com!news.highwinds-media.com!w19-v6no2380220itb.0!news-out.google.com!c189-v6ni1490ith.0!nntp.google.com!g24-v6no2407805iti.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 16 Aug 2018 05:52:01 -0700 (PDT)
In-Reply-To: <0139f162-7150-45bf-b14f-4ed593f8ee82@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=101.164.108.182;
 posting-account=wavAeAoAAAAZF_sXSZepBukuPCBO0Zqt
NNTP-Posting-Host: 101.164.108.182
References: <c51a57a0-6403-4cbf-a945-3036475083fa@googlegroups.com>
 <942a9ff7-9acd-47df-9e02-d32aa9fad2e2@googlegroups.com>
 <856da002-664f-4759-92ea-b4e63331d848@googlegroups.com>
 <aef4df7c-3718-4861-a0f0-5b9872db7d93@googlegroups.com>
 <f94cf36b-3ad2-464f-a12b-da8531061782@googlegroups.com>
 <0139f162-7150-45bf-b14f-4ed593f8ee82@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <55372a19-160e-4ac5-8fb7-78f45433b0d5@googlegroups.com>
Subject: Re: Can Ada print coloured/styled text to the terminal? (ANSI escape
 sequences?)
From: alby.gamper@gmail.com
Injection-Date: Thu, 16 Aug 2018 12:52:02 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Received-Bytes: 2784
X-Received-Body-CRC: 3674715811
Xref: reader02.eternal-september.org comp.lang.ada:54180
Date: 2018-08-16T05:52:01-07:00
List-Id: <comp.lang.ada>

On Thursday, August 16, 2018 at 10:29:11 PM UTC+10, Aurele Vitali wrote:
> Very nice Alex, and remember if you prefer a fullscreen mood (just like a=
n actual VT100 terminal), simply insert a "SetConsoleDisplayMode" API call =
with the "CONSOLE_FULLSCREEN_MODE" flag set.  You might also want to write =
your own thin Win32 spec. Just include something like this:
>=20
> function SetConsoleDisplayMode (
>                                 ConOut_Ref : access System.Address;
>                                 Flags      : Interfaces.C.unsigned_long;
>                                 Buffer_Ref : Coord_Ref
>                                )
>                                return Interfaces.C.int
>=20
> with Import        =3D> True,
>      Convention    =3D> StdCall,
>      External_Name =3D> "SetConsoleDisplayMode";
>=20
> Also,  Windows 10 supports two screen buffers (see Alternate Screen Buffe=
r in my first link): The main buffer has scroll bars,  the other has none. =
 Have fun!

Thanks Aurele, I hadn't thought of testing against Vt100 full screen mode, =
and
I will try (time permitting) to update the sample code accordingly