Error 'SQLQuery1: Cursor not returned from query'.

[grandmasterdari]

bueno este es el codigo

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

[jachguate]

Hola.

En primer lugar, bienvenid@ al clubdelphi. Te invito a leer la guía de estilo y tamibén el hilo de la calidad de las preguntas.

Con respecto de tu pregunta concreta, hará falta saber cual es el motor de base de datos que usas y la línea en concreto donde salta el error.

En lo particular, no me parece que estes introduciendo SQL válido para ningún motor.

Hasta luego.



pd. He editado tu mensaje original para añadir la etiqueta [ code ], te invito a aprender a usarla, al igual que la etiqueta delphi y sql

[grandmasterdari]

gracias.
bueno con respecto al motor de base de datos estoy utilizando mysql 5.0
con borland developer studio 2006 en c++,
tambien tengo los nuevos drivers de mysql ya que el que trae el compilador es para una version anterior del motor de db. (si alguien lo quiere no duden en pedir, ya ke lleva tiempo encontrarlos)

creo que ya saben como es la historia, utilizo esos 2 componentes para consultas:
. . sqlconnection1 -----> sqlquery1
donde sql connection1 ya lo configuro en la vcl y se conecta sin ningun problema respetando el nuevo driver, esto seria en codigo, pues yo hice lo mismo en grafico

      Connection := TSQLConnection.Create(nil);
      Connection.DriverName := 'dbxmysql';
      Connection.GetDriverFunc := 'getSQLDriverMYSQL50';
      Connection.LibraryName := 'dbxopenmysql50.dll';
      Connection.VendorLib := 'libmysql.dll';
      Connection.Params.Append('Database=NAME_OF_DATABASE);
      Connection.Params.Append('User_Name=NAME_OF_USER');
      Connection.Params.Append('Password=PASSWORD');
      Connection.Params.Append('HostName=localhost');

para realizar comandos sql necesito el tsqlquery instanciado por defecto SQLQuery1

tengo ke pasarle lo que quiero que haga

 SQLQuery1->SQL->add("show databases");

y las respuestas se quedan almacenadas en ese objeto ¿ como hago para saber que recibio mi objeto?
bueno, aparentemente se encuentra en SQLQuery1->Field tipo de dato TField y como es una especie de tabla lo ke recibo como respuesta realizo una busqueda del campo que me interesa de la siguiente forma

        while((!SQLQuery1->Eof)&&((SQLQuery1->FieldByName("Database")->AsString)!="basededatos"))
            SQLQuery1->Next();

salgo de esa iteracion cuando, o termina de recorrer y no hay coincidencias, o cuando encuentro la coincidencia.
hasta ahora vamos bien, pero ahora a mi objeto SQLQuery1 quiero hacerle otra consulta por ejemplo

SQLQuery1->SQL->add("show tables");

pero antes debo borrar la consulta anterior con este comando

SQLQuery1->SQL->Clear();

y para poder ejecutar mi consulta de show tables hago esta linea

SQLQuery1->Open();

<- Y ahi esta!!!... esa es la linea, no puedo hacer otras consultas sea cual sea despeus de haber recorride de la forma en la que hice

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(); //el error sale en esta linea

bueno espero haberme expresado bien
no tengo problemas si hay ejemplos en delphi (caral)

[[Caral]]

Hola
Ahora me acuerdo por que no me gusta c++
Lo que se podria hacer con un par de lineas en Delphi se complica en c.
Por lo menos a mi me parece, nunca he necesitado crear el objeto Bases de datos, para que ?
Bueno, solo opinion de Novato.
Saludos

[jachguate]

Empezado por Caral

Ahora me acuerdo por que no me gusta c++
Lo que se podria hacer con un par de lineas en Delphi se complica en c.
Por lo menos a mi me parece, nunca he necesitado crear el objeto Bases de datos, para que ?

Caral: c++ builder es muy parecido a delphi, la misma VCL disponible en delphi lo está en c++ builder, el IDE tiene prácticamente la misma funcionalidad.

De esa cuenta que sería posible tamibén en c++ builder realizar una aplicación sin crear la base de datos por código, de la misma manera que sería en Delphi posible realizar una aplicación donde esta se realice de esa manera. De hecho, yo he hecho algunas.

Por ejemplo, una que en tiempo de corrida se conectaba a una cantidad configurable de bases de datos, para replicar información entre ellas.

Hasta luego.

[jachguate]

Muevo el hilo del foro SQL al foro de mySQL, pues el problema está relacionado con esa base de datos y no con el lenguaje SQL en si.

Insisto en el uso de etiquetas, solo que esta vez, te toca a vos editar el mensaje y ponerlas.

Finalmente, siempre he creido que mySQL tiene un dialecto muy extraño. ¿Estas seguro que la instrucción show tables es un SQL válido para ese motor?

Hasta luego.

[grandmasterdari]

show tables ejemplo

click

[jachguate]

El que la herramienta lo acepte, no significa que sea un query válido para el motor.

El mismo comando existe, por ejemplo, en isql de firebird, pero es esta herramienta quien la traduce en el query adecuado. En ese caso podría ser:

Código SQL [-]
select rdb$relation_name table_name
  from rdb$relations
 where rdb$system_flag = 0

Esto lo digo para afirmar mi postura que pueda no ser un sql válido. Realmente desconozco si lo sea o no en el caso de mysql.

Hasta luego.