Language: 
Русский
English
  {InitWCrt.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the InitWinCrt procedure.}
uses Strings, WinCrt, WinDOS;
 begin
   StrCopy(WindowTitle,'InitWinCRT created CRT Window');
   Writeln('This is the my manually created CRT window.');
   Writeln('Notice the title.');
   InitWinCRT;
 end.

 
 ::
      
 ::
      
 ::