[Aristarh Dark]

Попробуй так:

Код:

Ini:=TIniFile.Create(IniFileName);
Sis:=Ini.ReadInteger('User','Sis',0);
with Form1.ADOQuery1 do
begin
  SQL.Clear;
  SQL.Add('Select Reports');
  SQL.Add('From Reports');
  SQL.Add('Where Sis<=:Sis');
  Parameters.ParseSQL(SQL.Text,True);
  Parameters.ParamByName('Sis').Value:=Sis;
//  Active:=True;  - Это лишнее
  open;
end;