Locate

Question

Estou utlizando o Seguinte Codigo:Dm.TbArea.Locate(�Codigo�, VarArrayOF([Dm.TbAtribuicaoCodigoSetor.value]), []);mas n�o est� funcionando esta dando o erro: ... Not convert variant of type (array vari...

Ipc$ · Answer

Tamb�m j� tive problemas com isso e acho que o m�todo Locate tem um pequeno furo. No caso do par�metro ser somente 1 e vc passar um array de variants mesmo que seja criado somente com um elemento ele d� erro. Ent�o para mim foi o seguinte: quando for mais de um par�metro, utilizo o array de variants criado por VarArrayCreate, se for um s�, utilizo
a variant como elemento �nico e n�o com v[0].
Me parece que no seu caso, VarArrayOf retorna um array de variants e passa v[0] p/ o Locate e � a� que d� o erro.

R�mulo Barros · Answer

Dm.TbArea.Locate(�Codigo�, VarArrayOF([Dm.TbAtribuicao.FieldByName(�CodigoSetor�).AsString]), []);

N�o custa nada. A propriedade .Value � do tipo variant, por isso q ocorre o erro.
No lugar de .AsString, vc tb poder� utiliza o .AsInteger;

:wink: :arrow: :arrow: :arrow: :arrow: oi eu aqui...

Sandra · Answer

Silvio,N�o sei qual o banco de dados est� utilizando, mas...Acho que est� havendo alguma confus�o a�. :D O VarArrayOf � utilizado quando se quer informar dois ou mais par�metros para o Locate. Por isso, o erro apresentado na compila��o. :idea: Pesquisando no f�rum, veja estes dois t�picos que encontrei:* [url=//delphiforum.icft.com.br/forum/viewtopic.php?t=46141&highlight=vararrayof]Locate em mais de um registro[/url]* [url=//delphiforum.icft.com.br/forum/viewtopic.php?t=41573&highlight=vararrayof]duvidas com locate[/url]Exemplo (e maiores detalhes) que consta no help do Delphi:[code:1:99e878c933]with CustTable do  Locate(�Company;Contact;Phone�, VarArrayOf(&#91;�Sight Diver�, �P�, �408-431-1000�&93;), &91;loPartialKey&93;);[/code:1:99e878c933]Verifique tamb�m se a unit DB est� declarada na lista de uses.Boa sorte!...