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

[noob]

Hola me gustaría saber cómo puedo hacer para que una unidad ejecute su código de initialization antes que otra.

Saludos.

[[Crandel]]

te referis a la seccion de initialization de la unit o a la creacion de una clase ?

[noob]

Al initialization de la unit.

[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.

[noob]

¡Muchas gracias!

[[Crandel]]

Hola noob, la solución es tal cual te comenta Dec, pero igualmente tener units que dependan del uno del otro en el orden de inicialización, no es algo que realmente yo recomendaría.

Intenta buscar otra solución, con una programación mas adecuada orientada a objetos.