Ordenar por un campo de una tabla que es de tipo date

[mancurnino]

he puesto:

Código SQL [-]
 
ModuloDatos.Query_OrdenarReservas.SQL.Add('Select ' + ModuloDatos.T_ReservaFechaIni.FieldName + ', ' +  ModuloDatos.T_ReservaFechaFin.FieldName);
ModuloDatos.Query_OrdenarReservas.SQL.Add('From ' + ModuloDatos.T_Reserva.DatabaseName);
ModuloDatos.Query_OrdenarReservas.SQL.Add('Order By ' + ModuloDatos.T_ReservaFechaIni.FieldName);
while not ModuloDatos.Query_OrdenarReservas.Eof do begin
  ListBox_Reservas.Items.Add(DateToStr(ModuloDatos.Query_OrdenarReservas));
  ModuloDatos.Query_OrdenarReservas.Next;
end;

pero en ListBox_Reservas.Items.Add(DateToStr(ModuloDatos.Query_OrdenarReservas)) no puedo poner .AsDateTime

[[eduarcol]]

ModuloDatos.Query_OrdenarReservas

Y tu tienes los campos persistentes, porq ese es el nombre del query no veo el campo por ningun lado.

seria

Código Delphi [-]
ModuloDatos.Query_OrdenarReservas.FieldbyName('Campo').AsDateTime

[mancurnino]

vale, ya está, gracias a todos jejeje.me quedo así:

Código SQL [-]
ModuloDatos.Query_OrdenarReservas.SQL.Clear;
ModuloDatos.Query_OrdenarReservas.SQL.Add('Select ' + ModuloDatos.T_ReservaFechaIni.FieldName + ', ' + ModuloDatos.T_ReservaFechaFin.FieldName);
ModuloDatos.Query_OrdenarReservas.SQL.Add('From ' + ModuloDatos.T_Reserva.TableName);
ModuloDatos.Query_OrdenarReservas.SQL.Add('Order By ' + ModuloDatos.T_ReservaFechaIni.FieldName);

Código Delphi [-]
ModuloDatos.Query_OrdenarReservas.Open;
while not ModuloDatos.Query_OrdenarReservas.Eof do begin
  ListBox_Reservas.Items.Add(DateToStr(ModuloDatos.Query_OrdenarReservas.FieldByName('FechaIni').AsDat  eTime) + ' - ' 
  + DateToStr(ModuloDatos.Query_OrdenarReservas.FieldByName('FechaFin').AsDateTime));
  ModuloDatos.Query_OrdenarReservas.Next;
end;