Ver Mensaje Individual
  #5  
Antiguo 12-05-2011
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Reputación: 24
BlueSteel Va por buen camino
Wink

Hola

yo he utilizado este procedimiento....


en el Evento OnTitleClick del JvDBGrid

pongo esto

Código Delphi [-]
If Column.Title.Caption='RUT' then
   Begin
        IBQ_Select.Close;
        IBQ_Select.SQL.Clear;
        If Sw_1 = 0 Then
           Begin
                IBQ_Select.SQL.Add('Select * from "Proveedor" Order By "Pro_Rut" ASC');
                Sw_1 := 1;
           End
        Else
           Begin
                IBQ_Select.SQL.Add('Select * from "Proveedor" Order By "Pro_Rut" DESC');
                Sw_1 := 0;
           End;
        IBQ_Select.Open;
   End;

Bueno, esto lo hago por cada columna del DBGrid y me lo ordena ya sea ascendente o descendente...

Salu2
__________________
BlueSteel
Responder Con Cita