Динамическое создание TADOQuery - 2-ой раз не проходит

String __fastcall TForm1::GetStrokes(String TableNames, String WhereAre)
{

  String ret = "";
  TADOQuery *Select= new TADOQuery(Form1);
  Select->Connection = ADOConnection1;
  ...
  delete Select;
  return ret;
}


bool __fastcall TForm1::SetStrokes(String TableName,
TStrings *Names, TStrings* Values)
{

  bool ret = true;
  TADOQuery *Select= new TADOQuery(Form1); // вот в этом месте
// вылезает "EAccessError in adres 0x00000011 in rtl60.bpl"
  Select->Connection = ADOConnection1;
  ...
  delete Select;
  return ret;
}