30 Jan
2002
30 Jan
'02
1:10 a.m.
On Tue, 29 Jan 2002, Guillaume Rousse wrote:
Everything now seems to be fine, however, CRT extension doesn't work -(
[guillaume@silbermann 301]$ cat test2.pas PROGRAM Test; USES CRT;
BEGIN WRITELN('Hello World'); END.
[..]
So, what going wrong there ?
with crt you need to open a window to write to it. try this:
program hello; uses crt;
var Awindow : winstate;
procedure InitWindow; begin textbackground( blue ); textcolor( lightgray ); makewin( Awindow, 1, 1, 30, 10 ); fillwin( ' ', textattr ); end;
begin Initwindow; writeln('hello world'); end.
Russ