Czy jest mozliwy dostep do zmienych znajdujacych sie w tabeli za pomoca zmiennych nie powiazanych z ta tabela, probowalem uzyc absolute i program sie kompiluje do momentu gdy nie napotka COLORS[1] (wartosci rozne od 0).
Jesli to co wyzej nie jest jasne, to inaczej, zmieniajac np:
COLORS[1] := clBlack
chce aby COLOR_a2 mialo ta sama wartosc co COLORS[1] (ten sam adres w pamieci)
var
COLORS: array[0..8] of TColor = (clRed, $00C1C1FF, clSilver, $00FFCE9D,
clLime, $00CCFFCC, clYellow, $00A6D2FF, clWhite);
COLOR_a1: TColor absolute COLORS[0];
COLOR_a2: TColor absolute COLORS[1];
COLOR_a3: TColor absolute COLORS[2];
COLOR_a4: TColor absolute COLORS[3];
COLOR_a5: TColor absolute COLORS[4];
COLOR_a6: TColor absolute COLORS[5];
COLOR_a7: TColor absolute COLORS[6];
COLOR_a8: TColor absolute COLORS[7];
COLOR_a9: TColor absolute COLORS[8];