Einzelnen Beitrag anzeigen

LarsSchwencke

Registriert seit: 28. Sep 2012
19 Beiträge
 
#1

Verfügbarkeit öffendlicher Units

  Alt 17. Jan 2014, 09:30
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
  Mit Zitat antworten Zitat