Foros Club Delphi - Ver Mensaje Individual - Error 'SQLQuery1: Cursor not returned from query'.

grandmasterdari · #1 11-01-2008

bueno este es el codigo

Código:

SQLQuery1->SQL->Clear();
SQLQuery1->SQL->Add("show tables");
SQLQuery1->Open();
TBookmarkStr BM= SQLQuery1->Bookmark;
SQLQuery1->First();
 while((!SQLQuery1->Eof)&&((SQLQuery1->FieldByName("Database")->AsString)!="basededatos"))
            SQLQuery1->Next();
SQLQuery1->Refresh();
ClientDataSet1->UpdateCursorPos();
SQLQuery1->Bookmark=BM;
SQLQuery1->Close();
SQLQuery1->SQL->Clear();
SQLQuery1->SQL->Add("use basededatos;");
SQLQuery1->Open();

//use el bookmark como ahora pero no hay cambios