Справочник функций и процедур Delphi: Out

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

|  новые статьи Instagram Instagram volgers kopen  |

Out
Деректива
Идентифицирует стандартный параметр только для вывода unit
  Routine name(... Out OutputVarName : type; ...)

Google  
 
Описание
Директива Out идентифицирует параметр функции или процедуры, являющийся переменной ссылкой только для выведения.

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

Delphi не предписывает это, и при этом это, кажется, не предписывает потребность присвоения значение.
Похожие команды
Const  Начинает определение данных с установленными значениями

Function  Определяет подпрограмму, которая возвращает значение

Procedure  Определяет подпрограмму, которая не возвращает значение

Var  Начинает раздела определения переменных

 
Пример кода : Демонстрация всех трёх типов обработки параметров
var
  number1, number2, number3 : Integer;
begin
  // Присвоение значений нашим числам
  number1 := 3;
  number2 := 4;
  number3 := 5;

  // Вызов простой подпрограммы, чтобы увидеть как они обработываются
  ThreeParms(number1, number2, number3);

  // Показ их значений
  ShowMessageFmt('number1 = %d number2 = %d number3 = %d ',
                 [number1, number2, number3]);
end;

// Простая подпрограмма, иллюстрирующая 3 типа обработки параметра
// value1: только входное значение
// value2: только выходное значение
// value2: входное и выходное значение
procedure TForm1.ThreeParms(    value1: Integer;
                            Out value2: Integer;
                            var value3: Integer);
begin
  // Добавление value1 к value3 как выходное значение value2
  value2 := value1 + value3;

  // Умножение value1 на value3, чтобы передать вывод value3
  value3 := value1 * value3;
end;
number1 = 3 number2 = 8 number3 = 15
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook