ما الفائدة من استخدام المحدد out في الاجرائية

[kachwahed]

وعليكم السلام ورحمة الله وبركاته
عندما تمرر COM Object من خلال تابع أو إجرائية استخدم التوجيه out لإلغاء القيمة الابتدائية لهذا الغرض ومستعملا هذا المتغير كمجرد حاوي للقيمة المرجعة
بخلاف التوجيه var الذي يأخذ بعين الاعتبار القيم الابتدائية (Initialize value)

مثال على السريع، لاحظ:

PHP كود :

procedure testout(out s: string);
begin
  ShowMessage(s);
  s := 'out param!';
end;

procedure testvar(var v: string);
begin
  ShowMessage(v);
  v := 'var param!';
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  str: string;
begin
  str := 'initialize value';
  testout(str);
  ShowMessage(str);

  str := 'initialize value';
  testvar(str);
  ShowMessage(str);
end; 


التمرير بـ out يستخدم عادة مع COM Object و Interface...

سؤال: هل بحثت في الـ Help ؟