Error No existe columna 'cod'

[[Caral]]

Hola
En parameters tienes que añadir Cod

Saludos

[magnu9]

De ante manos gracias Caral, siempre tu empeño por ayudar y que mas que bendecirte.

Y muy buena tu manera de informar con la pantalla. Sabes ese código lo tomé de tu sistema gesatrans. Pero hago eso en parameters coloco Cod, pero creo que el error es en el String del ADOQUERI1 que no encuentra Cod en CODUSU=Cod. Oh quizas mi base de datos.

Lo seguiré intentando a ver... si tiene una opinión bien recibida será.

[[Caral]]

Hola
Cambia la sentencia del adoquery1 asi:

Código SQL [-]
SELECT codusu, nomusu, pasusu FROM Usuario

Y cambia la primera parte del codigo asi:

Código Delphi [-]
   LoginOK :=False;
   //   AdoQuery1.Parameters.ParamByName('cod').Value:= Edit1.Text;
   ADOQuery1.SQL.Add('Where codusu = '''+Edit1.Text+'''');
   AdoQuery1.Active:= True;

Si tienes algun problema con las comillas del edit, esto depende de la base de datos, puedes probar varias formas, pero creo que funcionara.
Este sistema es esencialmente lo mismo, solo que sin parametros.
Saludos