Use assim:
AdsTable1.Locate
('CAMPO1;CAMPO2;CAMPO3',VarArrayOf([Valor1,Valor2,Valor3]),[])
Em 28/03/07, Roger <[EMAIL PROTECTED] > escreveu:
>
> Obrigado Leodinei pela tentativa.
>
> Mas o problema não é este (o tipo).
> Se fosse o caso, poderia declarar o array assim:
> PVCColunasPesquisadas : Array[0..1,0..1]of Variant;
>
> Mas o caso é que o FindKey não está aceitando o array como valor de
> pesquisa, independente de tipo do Array.
>
> Se mais alguém tiver alguma dica, serei grato.
>
> Abraço,
>
> Rogério Ricardo Fernandes
> Desenvolvimento
> GS3 Sistemas
> Tel.:47 3035-6020/Fax:47 3035-6050
> ----- Original Message -----
> From: Leodinei Bielak
> To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>
> Sent: Tuesday, March 27, 2007 5:20 PM
> Subject: Re: [delphi-br] (Ninguém Sabe??) Dúvida - como usar Array em
> FindNearest ou FindKey?
>
> Usa VarArrayCreate. Acho que é isso
>
> On 3/27/07, Roger < [EMAIL PROTECTED]<rogerblumenau%40yahoo.com.br>>
> wrote:
> >
> > Caros,
> >
> > Estou precisando de ajuda em algo um tanto simples, porém não consigo
> > lembrar como fazer.
> >
> > Tenho uma pesquisa da seguinte forma:
> >
> > AdsTable1.FindNearest([ 'AAX', '00002']);
> >
> > Mas quero fazer a mesma pesquisa, usando um Array, seria +/- assim:
> > Var
> > PVCColunasPesquisadas : Array[0..1,0..1]of String;
> > Begin
> > PVCColunasPesquisadas[ 1, 0] := 'AX';
> > PVCColunasPesquisadas[ 1, 1] := '00002';
> > AdsTable1.FindNearest ( PVCColunasPesquisadas[ 1]);
> >
> > Porém neste caso, ocorre erro 'Incompatible Types' na compilação.
> >
> > Rogério Ricardo Fernandes
> > Desenvolvimento
> > GS3 Sistemas
> > Tel.:47 3035-6020/Fax:47 3035-6050
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Leodinei Bielak
> http://leodinei.blogspot.com/
>
> "In theory, there is no difference between theory and practice.
> In practice, however......"
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
