Ver Mensaje Individual
  #3  
Antiguo 28-01-2016
waly2k1 waly2k1 is offline
Miembro
 
Registrado: dic 2006
Ubicación: El país de las maravillas(Argentina)
Posts: 251
Reputación: 18
waly2k1 Va por buen camino
Ordenar

Código:
    if qryPROD.Sort = Column.FieldName then
    begin
        qryPROD.Sort := Column.FieldName + ' DESC'
    end
    else
    begin
        qryPROD.Sort := Column.FieldName;
    end;
Despues los coloreas como quieras a la cabecera, esto es con ADO como en tu ej. y me manejo directamente con la consulta
Saludos
Responder Con Cita