Ordenação Numa Dbgrid

[Guest - D4rk Schn31d3r -]

Eu tenho dados provenientes de uma consulta, dentro de uma dbgrid e quero ordená-los sempre q eu clicar no title de uma respectiva coluna em ordem alfabética, se os dados daquela coluna forem do tipo string, ou fazer uma ordenação numérica, caso os dados sejam do tipo inteiro. Como faço isso?

[Graymalkin]

Você sabe ordenar por SQL? Utilizando a cláusula ORDER BY? Se souber, basta utilizar o evento HeadClick, que te informa o índice da coluna clicada, para obter o campo associado (através da propriedade DataField da coleção Columns) e refazer a SQL, colocando o campo da coluna clicada como o campo de ordenação.

Abraços,

Graymalkin

[D4rk Schn31d3r]

descobri como fazer, dessa forma:

Private Sub Form_Load()
   gTipoOrdenacaoGrid = "DESC"
End Sub

Private Sub dgrConsCliente_HeadClick(ByVal ColIndex As Integer)
   If gTipoOrdenacaoGrid = "ASC" Then
       de.rsspCliente_sps.Sort = dgrConsCliente.Columns(ColIndex).DataField & " ASC"
       gTipoOrdenacaoGrid = "DESC"
   ElseIf gTipoOrdenacaoGrid = "DESC" Then
       de.rsspCliente_sps.Sort = dgrConsCliente.Columns(ColIndex).DataField & " DESC"
       gTipoOrdenacaoGrid = "ASC"
   End If
End Sub

fiz esse exemplo utilizando data environment (de) utilizando uma store procedure (spCliente_sps) do SQL Server 2000, uma variável global q tem q ser setada no carregamento do form, q irá determinar se a ordenação será crescente ou decrescente e um grid chamado: dgrConsCliente, ...,