Error Al Ordenar Un Rxdbgrid Titlebtn

[__cadetill]

Bueno, el norte ya te lo ha dado Román

Empezado por roman

...además tendrás que lanzar la consulta SQL (si usas un Query) o cambiar el índice de la tabla (si usas un Table) para reordenar...

Es decir, has de cambiar el Order By de la Query o el IndexName si es un Table. Cómo?, bueno, esto te lo explico a grandes rasgos

Tienes 2 variables

Campos : Array of string;
Orden : Array of TSortMarker;

La primera tiene el nombre de los campos y la segunda el tipo de ordenación (smDown, smUp, smNone)

Sólo has de ir recorriendo el Array Campos e ir mirndo el tipo de ordenación en Orden para, o bien montar el SQL o bien montar el IndexFieldNames del Table

[dago_Ariza]

No Entiendo, Hermano Agradezco Tu Cooperacion..pero La Verdad No Entiendo!.

[dago_Ariza]

Empezado por dago_Ariza

No Entiendo, Hermano Agradezco Tu Cooperacion..pero La Verdad No Entiendo!.

ES DECIR, TENGO UN PROCEDURE QUE TIENE ESTO:
rocedure TTIPO_SERVICIO_FRM.DefineOrden(str :string);
var i : integer;
M : TSortMarker;
begin
i := 0;
// DM1.TIPOS_SERVICIOS.IndexName := 'ID_TIPO_SERVICIO';
while str <> Campos[i] do inc(i);
case orden[i] of
smNone : M := smDown;
smDown : M := smUp;
smUp : M := smNone;
else M := smNone;
end;
orden[i] := M;
end;


DONDE LE CAMBIO DE INDICES?

[dago_Ariza]

Ya Ordene Mis Pensamientos, Ya Entendi...todo...gracias