consultas por fechas en ADO

[josro0ck]

necesito hacer una consulta con las citas que esten registradas para hoy, pero no consigo hacerlo, parece que tengo algun problema de sql o no se como usarlo en delphi, ni base de datos tiene un campo fecha de formato dd/mm/aaaa y he probado la coneccion con otras consultas y si me da resultados, a excepcion de este caso , y ya tengo registros con el resultado del criterio en la base de datos
miren mi codigo

var
dd, mm, aa:word;
dia, ddd, mmm, aaa:string;
begin
decodedate(date, aa, mm, dd);
ddd:=inttostr(dd);
if length(ddd)<2 then
ddd:='0'+ddd;
mmm:=inttostr(mm);
if length(mmm)<2 then
mmm:='0'+mmm;
aaa:=inttostr(aa);
dia:=Concat(ddd,'/',mmm,'/',aaa);
{
q1.Close;
q1.SQL.Add('SELECT * FROM citas WHERE fecha = ' + dia);
q1.Open;
q1.First; }
edit1.text:='SELECT * FROM citas WHERE fecha = ' + dia;
end;

y el query queda asi, es este

SELECT * FROM citas WHERE fecha = 25/05/2011

por favor necesito ayuda, que es lo que he estado haciendo mal?, he estado buscando, y no he encontrado muchas cosas utiles,

Gracias.