Funktions-Deklaration in Library

[DeddyH]

Delphi-Quellcode:

uses
  SysUtils,
  Classes;

{$R *.res}

function Func1: integer; forward;
function Func2: integer; forward;

function Add: integer;
begin
  Result := Func1 + Func2;
end;

function Func1: integer;
begin
  Result := 1;
end;

function Func2: integer;
begin
  Result := 2;
end;

[edit] Roter Kasten mal wieder im Urlaub, Markus war schneller (dafür ich ausführlicher, immerhin) [/edit]