Verfügbarkeit öffendlicher Units

[LarsSchwencke]

Hallo,

mit der verfügbarkeit öffendlich deklarierter Units stehe ich
offensichtlich auf Kriegsfuß.
Auch scheint das Kapittel 6.1.2 im Borland Delphi 7 Grundlagen und Profiwissen
bei Delphi XE4 nicht zu funktionieren.

Mein Problem, 3 Units.
Die Unit 2 verwendet die Unit 3.
Die Unit 1 die Unit 2 und sollte aber auch die Funktionen der Unit 3 nutzen können.

Sollte es nicht so funktionieren?

Unit3:

Delphi-Quellcode:

unit Unit3;

interface

function Test3(): integer;

implementation

function Test3(): integer;
begin
...
end;

end.

Unit2

Delphi-Quellcode:

unit Unit2;

interface

uses Unit3;

function Test2(): integer;

implementation

function Test2(): integer;
var
  iCounter2: integer

begin
 iCounter2 := Test3();
end;
end.

Unit1

Delphi-Quellcode:

unit Unit1;

interface


function Test1(): integer;

implementation

uses Unit2;

function Test1(): integer;
var
  iCounter1: integer

begin
 iCounter1 := Test3();     // E2003 Undeklarierter Bezeichner: 'Test3' 
end;
end.

Kann mir jemand mitteilen, wie sich dies realisieren läßt?

Vielen Dank für alle Infos.

MfG
Lars