While... do Begin Try SQLQuery1.Close; SQLQuery1.Clear; SQLQuery1.SQL.ADD(...); SQLQuery1.ParamByName(..).AsString; SQLQuery1.Open; Except on E: Exception do ShowMessage(E.Message); End; End;
Sds, Romario Paulo Geloramo escreveu: > Ola Pessoal, > > Delphi 7 > DBExpress > > Uma query vai ser preparada para ser executadas > varias vezes, entao teremos: > > Try > SQLQuery1.Close; > SQLQuery1.Clear; > SQLQuery1.SQL.ADD(...); > SQLQuery1.Prepared := True; > > While... do > begin > SQLQuery1.Close; {este Close desprepara a Query??????????} > SQLQuery1.ParamByName(..).AsString; > SQLQuery1.Open; > end; > > if SQLQuery1.Prepared then > Message('Query1 continua preparada'); > > SQLQuery1.Close; > finally > SQLQuery1.Prepared := False; > end; > > O Close do loop desprepara a query? > > Alguma sugestão melhor para montar esta query? > > []s > Paulo Geloramo -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html