Описание |
Переменная Input предопределена Delphi для обращения к стандартному входному текстовому файлу.
Это обычная консоль, но она может быть заменена любым файлом, используя инструкцию AssignFile.
Input используется в Read, ReadLn и Seek процедурах текстового файла. Он может быть опущен в этих командах, однако он является файлом, заданным по умолчанию.
|
|
Похожие команды |
$AppType Определяет тип приложения: GUI или Console
Output Определяет стандартный выходной текстовый файл
Read Позволяет прочитать данные из двоичного или текстового файла
ReadLn Позволяет прочитать полную строку данных из текстового файла
| |
|
Пример кода : Считывает и записывает в консоль (устройство) |
program Project1;
{$AppType CONSOLE}
uses
SysUtils;
var
name : string;
begin // Консольное приложение имеет Input и Output консоли // связанные и открытые от нашего имени.
WriteLn(Output, 'Please enter your name');
ReadLn(Input, name);
// И мы даже не должны указывать имена этих файлов
WriteLn('Your name is '+name);
WriteLn('');
WriteLn('Press enter to exit');
ReadLn(name);
end.
|
Example console output :
Please enter your name
Joe Bloggs
Your name is Joe Bloggs
Press enter to exit
|
|