procedure TForm1.FormCreate(Sender: TObject); begin ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('SELECT * FROM events'); ADOQuery1.Active:=True; end;