Создание и подключение dll: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Mikst (обсуждение | вклад) |
Mikst (обсуждение | вклад) |
||
Строка 30: | Строка 30: | ||
== Main.pas == | == Main.pas == | ||
Это код основной программы | |||
<source lang="Delphi">{$reference mydll.dll} | <source lang="Delphi">{$reference mydll.dll} | ||
begin | begin |
Версия от 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.