Lo primero que se me ocurre es que estas definiendo en tu vector variables que no existen pues todos esos TEdits deben estar dentro de una clase de formulario... talvez debiese funcionar así:
Código Delphi
[-]const
ArrayX: Array[1..94] of TEdit = (Form1.edtAX,Form1.edtBX,Form1.edtCX...
pero eso tampoco te funcionaría pues no son constantes, son objetos de valor variable. Tales valores variables son 0 y al ser creados toman un valor que apunta a la dirección de memoria que contiene el objeto, yo aconsejo:
Código Delphi
[-]var ArrayX: array [1..94] of TEdit;
procedure TForm1.FormCreate(Sender: TObject);
var Index: Cardinal;
begin
Index := ComponentCount;
repeat Dec(Index);
if Components[Index] is TEdit then
if Components[Index].Tag <> 0 then
ArrayX[Components[Index].Tag] := (Components[Index] as TEdit);
until Index = 0;
end;
0j0: cada objeto será definido en tiempo de diseño con un "Tag <> 0" que definirá su índice en el vector (tambien se podría usar
TabOrder)
Saludos