写了一个函数，但不知怎么释放内存

function exec(ssql:string):Integer;
begin
  Result:=0;
  if recon then//这里是判断连接数据库的
  with TADOQuery.Create(nil) do
  begin
      try
        Connection:=Fdm.con;
        Close;
        sql.Clear;
        sql.Add(ssql);
        try
          Result:=ExecSQL;
        except
        end;
      finally
        Free;//想问问这样释放完全吗？在网上查说free并不释放指针为nil,想用freeandnil但在这里不知道怎么用。
      end;
  end;
end;