Os paso el trozo de código de la discordia y la tabla a la que le hago la consulta.
Código Delphi
[-]
adoquery4.Close;
adoquery4.SQL.Text:='SELECT * FROM log WHERE destinatario=' + quotedstr('Dioni') + ' AND leido=false AND (fechaprog <=#' + datetostr(date) + '# AND horaprog<=#' + timetostr(time) + '#)';
adoquery4.ExecSQL;
adoquery4.Open;
if adoquery4.IsEmpty then
begin
showmessage('Vacio');
end
else
begin
showmessage(adoquery4.FieldByName('mensaje').AsString);
end;
Un saludo