No me encuentra un registro que existe, puse mal el where?
 

Hola, estoy trabajando con Delphi y objeto Tquery para administrar una bdd y tengo un problemilla con un where que no me encuentra nunca un registro que si existe por culpa de un campo de tipo datetime.

Cuando hago un insert SI FUNCIONA, y el insert es el siguiente:

Código Delphi [-]
bd.sql := 'INSERT into vol values(' + quotedstr(Self.avio) + ',' + 
             quotedstr(datetostr(Self.data)) + ',' + inttostr(self.passatgers);

Como veis, la fecha se la meto en forma de string entre comillas sin problema y funciona bien, el problema es a la hora de actualizarla o eliminarla, que no encuentro el registro, si lo hago con un datetime entre comillas me da error por tipo de datos incorrecto, y si no le meto las comillas no me da error pero nunca me lo encuentra, lo tengo asi:

Código Delphi [-]
bd.sql:='select estat from vol where nom_avio=' + quotedstr(Self.avio) +
        ' AND data=' + datetostr(Self.data);

Código Delphi [-]
bd.sql:='update vol set estat=''iniciat'' WHERE nom_avio=' + 
               quotedstr(Self.avio) + ' AND data=' + datetostr(Self.data) ;

El caso es que la fecha no esta puesta incorrecta ya que lo he mirado y ademas cojo ese valor directamente de la bdd, lo que creo que debe fallar es o al insertar la fecha o al consultarla en ese where, quizas deba poner algo que desconozco.

He de decir que si quito la fecha de la consulta si que me encuentra el registro, es decir, que lo que falla es a la hora de intentar buscar la fecha.

Espero haberme explicado bien y a ver si alguien es capaz de ayudarme. ;)
Gracias

Saludos

Es mejor usar parametros para "jugar" con fechas en una consulta.
Insert

Código Delphi [-]
bd.sql := 'INSERT into vol values(:avio, :data, :passatgers');

Select

Código Delphi [-]
bd.sql:='select estat from vol where nom_avio=:avio AND data=:data';

Update

Código Delphi [-]
bd.sql:='update vol set estat=''iniciat'' WHERE nom_avio=:avio AND data=:data';

Antes de cada ejecucion, sea este Open o ExecSql debes pasar valores a los paramentro:

Código Delphi [-]
bd.ParamByName('avio').AsString:=Self.Avio//Aunque no es necesario el 'Self'
bd.ParamByName('data').AsDate:=Self.data;
....//y asi, asi,
...

Gracias, no conocia esa forma de hacer consultas, hare pruebas y a ver si me sale ;)