[AlexSku]

Всё делается по цепочке:
Project1.exe:

Код:

function Fun1(X1, X2: Integer): Integer; external 'lib1.dll';

procedure TForm1.Button1Click(Sender: TObject);
begin
  Caption:= IntToStr(Fun1(2, 3));
end;

Lib1.dll:

Код:

function Fun2(Y1: Integer): Integer; external 'lib2.dll';

function Fun1(X1, X2: Integer): Integer;
begin
  Result:= Fun2(X1) + Fun2(X2);
end;
exports Fun1;

begin
end.

Lib2.dll:

Код:

function Fun2(Y1: Integer): Integer;
begin
  Result:= Sqr(Y1);
end;
exports Fun2;

begin
end.