Consultas por fecha

[gerasA]

Hola!
Tengo un problemita, lo que pasa es que tengo 7 tablas con los mismos campos y quiero que el usuario consulte por fecha de cada tabla, pero el formato de la fecha de mi tabla es dd/mm/aaaa y en sql el formato es mm/dd/aaaa entonces quiero cambiar el formato, osea que el usuario capture dd/mm/aaaa lo ke hago es lo sig:

Código Delphi [-]
consulta:='select * from Aluminio where Fecha =';
consulta:=consulta+quotedstr(edit1.Text);
consulta:=consulta+'order by Folio';
Query1.SQL.Clear;
Query1.SQL.Add(consulta);
Query1.Active;
Query1.Open;

Si hace la consulta pero el usuario tendria ke capturar la fecha asi mm/dd/aaaa como les comento yo kiero ke capture dd/mm/aaaa
espero ke me puedan ayudar
Gracias