Создание и подключение dll: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Строка 1: Строка 1:
Здесь используется упрощенный синтаксис dll - без деления на интерфейс и реализацию.
Здесь используется упрощенный синтаксис dll - без деления на интерфейс и реализацию.
== MyDll.dll ==
== MyDll.dll ==
Это код библиотеки dll.
<source lang="Delphi">library MyDll;
<source lang="Delphi">library MyDll;


Строка 27: Строка 28:


end.</source>
end.</source>
== Main.pas ==
== Main.pas ==



Версия от 20:58, 15 января 2010

Здесь используется упрощенный синтаксис dll - без деления на интерфейс и реализацию.

MyDll.dll

Это код библиотеки dll.

library MyDll;

const 
  PascalABCNET = 'PascalABC.NET';

type 
  My = class 
  private
    s: string;
  public  
    constructor (s: string);
    begin
      Self.s := s;
    end;
    function ToString; override;
    begin
      Result := s;
    end;
  end;

function MyAdd(a,b: integer): integer;
begin
  Result := a + b;
end;

end.

Main.pas

{$reference mydll.dll}
begin
  PrintPascalABCNET;
  writeln(n);
  writeln(add(2,3));
end.

Ссылки