Procedimento com Query
PessoALL,
Tenho uma rotina dentro de meu sistema, onde executo diversas vezes uma query ..., mas parece q qdo esta chegando no final da minha rotina da pau de memoria ...
para ser + claro ... estou fazendo um while em uma tabela e pego o codigo do registro e passo como parametro para essa query.
o codigo da query fica assim :
while not tabela.eof do
query1.close;
query1.param[0].asstring := codigo do registro
query1.execsql;
query1.open
o resultado da query ... faco o q tenho q fazer e depois
tabela.next;
mas qdo esta chegando no final da tabela percorrida da pau de memoria !!!
acho q esta carregando a memoria e nao esta liberando ... como faco para acertar isso ?
Obr pela ajuda
Tenho uma rotina dentro de meu sistema, onde executo diversas vezes uma query ..., mas parece q qdo esta chegando no final da minha rotina da pau de memoria ...
para ser + claro ... estou fazendo um while em uma tabela e pego o codigo do registro e passo como parametro para essa query.
o codigo da query fica assim :
while not tabela.eof do
query1.close;
query1.param[0].asstring := codigo do registro
query1.execsql;
query1.open
o resultado da query ... faco o q tenho q fazer e depois
tabela.next;
mas qdo esta chegando no final da tabela percorrida da pau de memoria !!!
acho q esta carregando a memoria e nao esta liberando ... como faco para acertar isso ?
Obr pela ajuda
Scandolara
Curtidas 0
Respostas
Lucas Silva
27/04/2004
[b:569deafdbe]Tabela.First;[/b:569deafdbe]
while not tabela.eof do
[b:569deafdbe]begin[/b:569deafdbe]
query1.close;
query1.param[0].asstring := codigo do registro
query1.execsql;
query1.open
[b:569deafdbe]Tabela.Next;[/b:569deafdbe]
[b:569deafdbe]end;[/b:569deafdbe]
while not tabela.eof do
[b:569deafdbe]begin[/b:569deafdbe]
query1.close;
query1.param[0].asstring := codigo do registro
query1.execsql;
query1.open
[b:569deafdbe]Tabela.Next;[/b:569deafdbe]
[b:569deafdbe]end;[/b:569deafdbe]
GOSTEI 0
Scandolara
27/04/2004
naum entendi amigo ?!?!?!?!
GOSTEI 0