Hola,
Debes incluir la unidad antes que la otra. Valga un ejemplo:
Unidad 1:
Código Delphi
[-]
unit Unit1;
interface
uses
Forms, Unit2, Unit3;
type
TForm1 = class(TForm)
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Unidad 2
Código Delphi
[-]
unit Unit2;
interface
implementation
uses
Dialogs;
initialization
ShowMessage('Hello from Unit2.pas');
end.
Unidad 3
Código Delphi
[-]
unit Unit3;
interface
implementation
uses
Dialogs;
initialization
ShowMessage('Hello from Unit3.pas');
end.
En este caso, lo que verás primero será el "Hola" de la unidad 2. Pero, puedes cambiar el orden:
Código Delphi
[-]
unit Unit1;
interface
uses
Forms, Unit3, Unit2;
type
TForm1 = class(TForm)
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Y verás entonces primero el "Hola" de la unidad 3.