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