Gente, lo solucione cambiando el query.Open por query.ExecSQL.
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin
query.Close;
query.SQL.Clear;
query.SQL.Add('select * from usuarios where usuario = :usu and contrasenia = :contra');
query.ParamByName('usu').AsString:= edit1.Text;
query.ParamByName('contra').AsString:= edit2.Text;
query.ExecSQL;
end;
El tema ahora es que no me "levanta" el registro, pero al menos no tira error je. Tienen idea que puede ser? Hago un fetchRow del query y me da 0. Error de tipeo no hay jeje.
Y ya que estoy hago otra consulta. Para acceder a los datos que me devuelve la consulta, debo hacerle un Open al query?? Porque es la función que me arroja el error.
jpgonzalez muy bueno el video... de dónde bajaron uds. las librerías Zeos? Yo tengo la versión 6.6.6 estable y tiene los paquetes hasta delphi 9, y el del video tiene hasta el 15!
Gracias, espero no molestarlos mas jaja. Un abrazo