Pesquisa CSV com ADO

Delphi

18/12/2006

Bom dia.
Eu tenho um ADOTable, que esta conectado com um arquivo csv.
E gostaria de filtrar esses dados que estão sendo mostrados no GRID.
Alguém sabe como fazer isso?


Blbacelar

Blbacelar

Curtidas 0

Respostas

Bon Jovi

Bon Jovi

18/12/2006

ve a propriedade filter


GOSTEI 0
Blbacelar

Blbacelar

18/12/2006

Mas o que eu coloco nesse campo?
se é um arquivo CSV, ele não tem nome de campo.


GOSTEI 0
Bon Jovi

Bon Jovi

18/12/2006

Normalmente vem como F1, F2, F3, ...

Senao, faça um teste:

const
  CAMPO_TESTE = 0;
var
  i: integer;
begin
  ADOTable1.Close;
  ADOTable1.ConnectionString := ´Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\;Extended Properties="text;HDR=No;FMT=Delimited";Persist Security Info=False´;
  ADOTable1.TableName := ´Pasta1#csv´;
  ADOTable1.Open;

  ADOTable1.Filter := ADOTable1.Fields[CAMPO_TESTE].FieldName + ´ = ´ + QuotedStr(´teste´);
  ADOTable1.Filtered := True;

  for i := 0 to ADOTable1.Fields.Count - 1 do
    ShowMessage(ADOTable1.Fields[i].FieldName);



GOSTEI 0
Blbacelar

Blbacelar

18/12/2006

Muito obrigado, funcionou a sua dica.


GOSTEI 0
POSTAR