Delphi - Sql y fechas

Hola a todos ? Soy nuevo programando
miren tengo un campo tipo date y quiero hacer una comparacion con la fecha de hoy : Es una parte del codigo:

BQInformes.Close;
IBQInformes.Sql.Clear;
IBQInformes.SQL.Add('SELECT * FROM Telas INNER JOIN Descripcion '+
'ON Telas.Descripcion1 = Descripcion.Descripcion where Fecha_prometida < '''+datetostr(today)+'''');
IBQInformes.Open;

el problema que tengo creo que el formato de la fecha today es dd/mm/yy y el del sql es mm/dd/yy entonces como hago para que today obtenga la fecha como mm/dd/yy. Muchas gracias a todos
Saludos, : )

cual es el error que muestra?

ya lo arregle de esta forma por si alguien tiene algun problema igual cambie el formato y funciono muchas gracias por contestar

'IBQInformes.Close;
IBQInformes.Sql.Clear;
IBQInformes.SQL.Add('SELECT * FROM Telas INNER JOIN Descripcion '+
'ON Telas.Descripcion1 = Descripcion.Descripcion where Telas.FECHA_PROMETIDA <'''+formatdatetime('mm/dd/yy',Today)+'''');
IBQInformes.Open;