Pessoal,

Estou usando a função abaixo para me retornar um TField, mas quando faço 
algo como field := Conn.GetCampo('select...'), sendo field uma variavel 
TField, aparece um erro de 'Access violation...'.

Verifiquei que é por causa do Close/FreeAndNil da função GetCampo, seria 
isso mesmo? Terei que deixar a variável qry aberta e na memória?

function TConexaoIBX.GetCampo(const sql : string) : TField;
var
   qry : TIBQuery;
begin
   try
     qry := TIBQuery.Create(nil);
     qry.Database := FDB;
     qry.SQL.Text := sql;
     qry.Open;
     Result := qry.Fields[0];
   finally
     qry.Close;
     FreeAndNil(qry);
   end;
end;


Álvaro Vieira.



-- 
<<<<< 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

 



Responder a