Методы расширения

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску

Можно расширить любой тип невиртуальными методами. 

procedure integer.Hello;
begin
  writeln(Self);
end;

type iarr = System.Array;

procedure iarr.Hello;
begin
  foreach x: integer in Self do
    write(x,' ');
end;  

begin
  var i: integer := 777;
  i.Hello;
  var a: array of integer := (1,3,5);
  a.Hello;
end.

Ссылки

Источник — https://pascalabc.net/wiki/index.php?title=Методы_расширения&oldid=1388