Olá pessoal, Janise, desculpe aí eu pegar o "bonde parando", mas, é só uma dica:
--- Normal --- dmBaseDados. T_Clientes. open; dmBaseDados. T_Clientes. Locate('Nome' , edtnome.Text, [loPartialkey, loCaseinsensitive] ); --- --- Economico --- with dmBaseDados, T_Clientes do **begin ****Open; ****Locate('Nome' , edtnome.Text, [loPartialkey, loCaseinsensitive] ); **end; --- Remova os "*". "... Economico em que criatura?" no código, enxugar código é uma boa, veja um pouco sobre "with..do": [http://www.geocities.com/wallstreet/exchange/1726/computing/delphi/delphi_2.htm] No Google existem inúmeros [artigos/dicas/exemplos] explicando o uso correto do "with..do", pq ele pode ser perigoso caso o programador não saiba usá-lo corretamente. P.S.: No arquivos "DTDelphi800.chm" entre outros CHM com dicas e truques, tem muitos exemplos com o comando "with". ________________________________ []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ °oO| Seja livre, use Linux! |Oo° Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]