entrando en el mundo ADO

[weke]

He colocado un 'ADOConnection' en el formulario principal. Lo he declarado como publico para que todos los componentes se conecten a él.
He asignado los datos que tenía en la propiedad "ConnecionString" del 'ADOCommand'.
Pero cuando ejecuto la aplicación, me da el error siguiente:

Class TADO Connection not found.

La propiedad "LoginPrompt" la he puesto a false para que no me pida clave.
Ya no he tocado ninguna propiedad más.

¿Debería hacer algo más o así ya debería funcionar?

Muchas gracias y un saludo.

[__marcsc]

La conexión te funciona en tiempo de diseño y te da error al ejecutar? O la creas por código?

[weke]

La conexión la creo en tiempo de diseño, en tiempo de ejecución solo voy a conectarla (cuando cree la aplicación) y desconectarla (cuando la cierre):

Código Delphi [-]
Connected:=true;
Conencted:=false;

Pero de momento no la he dejado a false porque me da el error antes de crear la aplicación, y me sigue dando el error.

Gracias.

[Nelet]

En la cláusula USES tienes la referencia a ADOdb?

[weke]

Gracias, Fnadalo, por tus consejillos. Los pondré en práctica en cuanto pueda.

Ahora respondiendo a la pregunta de Nelet, si tengo la referencia a ADODB en el uses.

[weke]

Fnadalo, ya he modificado lo del Datamodule que me indicaste, funciona muy bien, gracias otra vez.
Con respecto a si utilizao muchos registros, pues de 100 para arriba. Antes tenía hechas una serie de consultas que me funcionaban correctamente, pero en ADO no se si cambiará en algo. La verdad es que no he tocado nada de la consulta que tenía, simplemente le he cambiado el nombre al ADOQuery y he ejecutado, pero la consulta no me devuelve nada. Un ejemplo de consulta es la siguietne:

Código Delphi [-]
  Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add('SELECT * FROM Music WHERE Formato like "*' + aux + '*" order by Grupo');
  Query1.Active:=true;
  Query1.Open;

Si hay algún error, gracias por indicármelo.

Saludos.

[FNADALO]

Weke te paso un código que es como lo utilizo este genera
un Abm a partir de unos campos y una tabla,

Código Delphi [-]
  AdoQuery1.Close;
     AdoQuery1.SQL.Clear;
     ADOQuery1.Connection := DataModule1.ADOConnection1;

     if SqlStr.Text <>'' then
        begin
           AdoQuery1.SQL.Add(SqlStr.Text)
        end
        else AdoQuery1.SQL.Add('Select * From '+ Tabla.Text);

//     AdoQuery1.SQL.Add(SqlStr);
//     AdoQuery1.SQL.Add('Select * From '+ Tabla );
     if Busca.Text <> '' then
        begin
           AdoQuery1.SQL.Add('where '+ Busco.Text);
           AdoQuery1.SQL.Add(' LIKE '+ quotedStr(Busca.Text) +' + ' + '''%''');
        end;


     AdoQuery1.SQL.Add('ORDER BY ' + Busco.Text);
     AdoQuery1.Open;

  // Asignación al Objeto DataSource el DataSet. ---
     DataSource1.DataSet := AdoQuery1;

Fijate en la linea que tengo el Like.

[FNADALO]

Fijate en la propiedad Active debes ponersela a True,
yo al contrario que tú he trabajado siempre con Ado frente a
Access o Sql Server, muy buena elección Ado, Te felicito
ahora dejate darte unos consejos, pon un Datamodule donde
solo tendrás el AdoConnection y pasasela a todo formulario que
crees, no hace falta de este modo crearla como Public, ya lo
será, el segundo tema a plantearte es el siguiente trabajara tus aplicaciones
Cliente/Servidor, con muchos registros, supongamos que me respondes que si
entonces el proximo paso será un AdoQuery donde lo conectaras al AdoConnection y pondrás tus propios Selects, Agregaras un DataSouce
y asi ya tienes un Recodset Actualizable,,,, empieza por aqui Saludos.