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]

Responder a