Delphi-Help

Описание

var Output : TextFile;

Переменная Output предопределена Delphi, для того чтобы обратиться к стандартному текстовому выходному файлу. Это обычная консоль, но она может быть заменена любым файлом, используя инструкцию AssignFile.

Output используется в Write, WriteLn и Seek процедурах текстового файла. Он может быть опущен в этих командах, однако он является файлом, заданным по умолчанию.

Пример кода

program Project1;

{$AppType CONSOLE}

uses
SysUtils;

var
name : string;

begin
// Консольное приложение имеет консоль Input и Output
// назначенные и открытые от нашего имени.
WriteLn(Output, 'Пожалуйста, введите своё имя');
ReadLn(Input, name);

// И мы даже не должны указывать имена этих файлов
WriteLn('Ваше имя '+name);
WriteLn('');
WriteLn('Нажмите enter для выхода');
ReadLn(name);
end.

Пример вывод консоли:

Пожалуйста, введите своё имя
Абзалов Рашид
Ваше имя Абзалов Рашид

Нажмите enter для выхода

Примечание