Язык:
Русский
English
InitWinCrt (процедура) (модуль WinCrt)
Создает окно CRT, если оно еще не было создано.
Объявление
Procedure InitWinCrt;
Режим
Windows
Замечания
Процедура InitWinCrt автоматически вызывается, если вы использовали обращение к процедурам Read, ReadLn, Write или WriteLn для файла, который был назначен к CRT. InitWinCrt использует константы WindowOrg, WindowSize и ScreenSize, и переменную WindowTitle, чтобы определять характеристики создаваемого окна CRT.
Пример
Язык:
Русский
English
{ Пример программы для процедуры InitWinCrt }
{ Компилировать в режиме Windows }
{ Используйте русские фонты в Win32 }
uses Strings, WinCrt, WinDos;
begin
StrCopy(WindowTitle, 'Окно, созданное с помощью InitWinCRT');
WriteLn('Это окно создано вручную.');
WriteLn('Посмотрите на заголовок окна !!!');
InitWinCRT;
end.
{ Используйте русские фонты в Win32 }
uses Strings, WinCrt, WinDos;
begin
StrCopy(WindowTitle, 'Окно, созданное с помощью InitWinCRT');
WriteLn('Это окно создано вручную.');
WriteLn('Посмотрите на заголовок окна !!!');
InitWinCRT;
end.