[Vocabulary]

Код:

for t:=0 to high(war) do begin
adon.insert;
adon.fields[1].asinteger:=nom[war[i]];
adon.post;
end;

Откуда взялась переменная "i"?

P.S. И мой тебе совет, обращаясь сюда за помощью, не держи других за идиотов.