Alterar el orden en que las clases ejecutan su código initialization

[dec]

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.