[Viajero]

У меня тоже такое не компилится.
Советую проверять по справке синтаксис каждой незнакомой ранее функции.

Правильно
Form2.ADOQuery1.FieldByName('Номер').AsString:='1' ;