Como usar o comando With

Delphi

17/03/2003

Alguem sabe como e para que serve o comando With ... do begin ?

Alguns exemplos ?

Obrigado


Rodrigo Costa

Rodrigo Costa

Curtidas 0

Melhor post

Nebrio

Nebrio

17/03/2003

O with é como se fosse um comando de leitura e pode ser usado assim:

with Query1 do
begin
Close;
SQL.CLear;
SQL.Add(´Select * from CLientes´);
Open;
end;

do contario vc teria que fazer assim:

Query1.Close;
Query1.SQL.CLear;
Query1.SQL.Add(´Select * from CLientes´);
Query1.Open;


Só lembrando que vc deve ter cuidado em usá-lo.


GOSTEI 2

Mais Respostas

Rodrigo Costa

Rodrigo Costa

17/03/2003

Valeu nebrio !


Thanks !


GOSTEI 0
Carlos Filho

Carlos Filho

17/03/2003

Por que se feve ter cuidado ao usar o With?
ao meu ver ele é bem inofensivo...


GOSTEI 0
Rodrigo Guimaraes

Rodrigo Guimaraes

17/03/2003

Essa pergunta merece responda... Kd o professor?
GOSTEI 0
Raimundo Pereira

Raimundo Pereira

17/03/2003

Geralmente uso para varrer e setar propriedades dos componentes.

Uso sem with num memo
memo1.clear;
memo1.loadfromfile('');
memo1.lines.add('teste1');

Uso com with num memo
with memo1 do begin
clear;
loadfromfile('');
lines.add('teste1');

E etc.
Uso muito

GOSTEI 0
Leonardo Cavalcante

Leonardo Cavalcante

17/03/2003

Por que se feve ter cuidado ao usar o With?
ao meu ver ele é bem inofensivo...


Um bloco de código com
with 
torna-se a leitura do código mais complexa, se abusar então, criando with aninhados a legibilidade do código fica horrível, lempre-se de "KISS (Keep It Simple, Stupid), sem falar que também é péssimo debugar
with
. Na dúvida eu prefiro nunca usar.
GOSTEI 0
POSTAR