Отсутствует значение одного или нескольких требуемых параметров (Access)

Function TMain.ReadTable(UnDoc,PoleDoc:string):string;
begin
 ADOQuery1.Active:=False;
 ADOQuery1.Parameters.Clear;
 ADOQuery1.SQL.Clear;
 ADOQuery1.SQL.Text:='select :Par1 from RunDocs where UnDok = :Par2';
 ADOQuery1.Parameters.ParamByName('Par1').Value:=PoleDoc;
 ADOQuery1.Parameters.ParamByName('Par2').Value:=UnDoc;
 ADOQuery1.Active:=true;
 result:=ADOQuery1.FieldByName(PoleDoc).asstring;
end;
В результате: Отсутствует значение одного или нескольких требуемых параметровФункцию вызываю так: ReadTable('1','NameDoc');
1 ответ

Вот тут ответ: http://www.programmersforum.ru/showthread.php?t=80731Самому поиском воспользоваться религия не позволяет?