[firebase-br] IBO com TIBOQuery não funciona OrderingItemNo e OrderingItems

[Bruno Garcia Silva]

Tá bom, agora entendi... meio estranho, mas funciona bem! e Ordena nos dois
sentidos! Já dá para me livrar do TClientDataSet !

procedure TFPrincipal.DBFinancaTitleClick(Column: TColumn);
begin
// if(dm.DataSourceFinanca.DataSet.Active) then
dm.CDSFinanca.IndexFieldNames:=Column.Field.FieldName;

dm.IBOQueryFinanca.OrderingItems.Text:=Column.FieldName+'='+Column.FieldName+';'+Column.FieldName+'
DESC';
  if dm.IBOQueryFinanca.OrderingItemNo=0 then
dm.IBOQueryFinanca.OrderingItemNo:=1 else
dm.IBOQueryFinanca.OrderingItemNo:=dm.IBOQueryFinanca.OrderingItemNo * -1;
end;

Em 27 de agosto de 2015 14:10, Bruno Garcia Silva <brunogarcia69 em gmail.com>
escreveu:

> Bom dia a todos!
>
> Estou tentando ordenar e apresentar o resultado num TDBGrid mas não estou
> conseguindo... não ordena nada!
> Queria clicar em uma coluna qualquer e ordenar esta coluna como tenho
> feito com o TClientDataSet...
> Já tirei-o do caminho, o TClientDataSet ligando o TDataSource direto no
> TIBOQuery, mas não ordena nada nem mesmo setando diretamente no
> componente...
> Não sei o que estou fazendo errado, mas o Filter e Filtered=true esta
> funcionando...
> O que estou fazendo errado ou o que esqueci???
>
> Obrigado!
>
>
>
> --
> *Me. Bruno Garcia da Silva*
> Analista de Sistemas
> e-mail: brunogarcia69 em gmail.com
> Whatsapp: 41-9988-1802
>



-- 
*Me. Bruno Garcia da Silva*
Analista de Sistemas
e-mail: brunogarcia69 em gmail.com
Whatsapp: 41-9988-1802