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;