急，求援

tableto.open;
      bh1:=FieldByName('bh').Asstring;
      zdbh:=fieldbyname('zdbh').asstring;
  if not tableto.Locate('bh;zdbh',vararrayof([bh1,zdbh]),[loPartialKey]) then
     begin
        tableto.open;
        tableto.append;

     END；
老是提示vararrayof有错，以前在D5下都正通的，可在D7下通不过了
错误为 [Error] hb_infsys.pas(310): Undeclared identifier: 'vararrayof'