Целесообразность применения out

[Miha85193]

Здравствуйте.
Хотелось бы узнать о целесообразности применения out в процедурах и функциях. На сколько я понимаю параметр объявленный с помощью out не возможно присвоить другим переменным (если я конечно не ошибаюсь), чего нельзя сказать о параметре объявленном с помощью var. Если вы знаете что либо о преимуществах или недостатках использования этой директивы - напишите об этом здесь. Благодарю за внимание.

[Stilet]

На сколько я понимаю параметр объявленный с помощью out не возможно присвоить другим переменным

out параметр отличается от var параметра тем что когда вызывается процедура, с таким параметром, переменная переданная по нему очищается от значений. Обнуляется, опустевает называй как хочешь.
Целесообразность его применения в том что эта переменная сама инициализируется, убирается из нее мусор, в то время как var параметр не изменяет своего содержимого.

[SERG1980]

Мальца теории
Для объявления выходных параметров служит ключевое слово out:

procedure GetScreenResolution(out Width, Height: Integer);
begin
  Width := GetScreenWidth;
  Height := GetScreenHeight;
end;

Установка значений выходных параметров внутри подпрограммы приводит к установке значений переменных, переданных в качестве аргументов:

var
  W, H: Integer;
begin
  GetScreenResolution(W, H);
  ...
end;

После вызова процедуры GetScreenResolution переменные W и H будут содержать значения, которые были присвоены формальным параметрам Width и Height соответственно.
Если параметр является одновременно и входным, и выходным, то он описывается с ключевым словом var:
procedure Exchange(var A, B: Integer);

var
  C: Integer;
begin
  C := A;
  A := B;
  B := C;
end;

Изменение значений var-параметров внутри подпрограммы приводит к изменению значений переменных, переданных в качестве аргументов:

var
  X, Y: Integer;
begin
  X := 5;
  Y := 10;
  ...
  Exchange(X, Y);
  // Теперь X = 10, Y = 5
  ...
end;

При вызове подпрограмм на место out- и var-параметров можно подставлять только переменные, но не константы и не выражения.
Если при описании параметра не указано ни одно из ключевых слов const, out, или var, то параметр считается входным, его можно изменять, но все изменения не влияют на фактический аргумент, поскольку они выполняются с копией аргумента, создаваемой на время работы подпрограммы. При вызове подпрограммы на месте такого параметра можно использовать константы и выражения. Пример подпрограммы:
f

unction NumberOfSetBits(A: Cardinal): Byte;
begin
  Result := 0;
  while A <> 0 do
  begin
    Result := Result + (A mod 2);
    A := A div 2;
  end;
end;

Параметр A в приведенной функции является входным, но при этом он используется в качестве локальной переменной для хранения промежуточных данных.
PS ну а теперь сами подумайте где это можно применить

[Miha85193]

Спасибо. Теперь мне более-менее понятно где можно применить out. Исходя из моего опыта эта детектива встречается достаточно редко и поэтому эта тема будет полезна не только мне.

Еще хотелось бы узнать бывают ли ошибки связанные с использованием этой директивы и если бывают то какие. Еще раз спасибо.

[Miha85193]

Спасибо. Теперь мне более-менее понятно где можно применить out. Исходя из моего опыта эта директива встречается довольно редко, так что я думаю эта тема будет полезна не только мне.

Еще хотелось бы узнать бывают ли ошибки, связанные с использованием этой директивы и если бывают то какие. Еще раз большое спасибо.