Как я могу получить/установить отдельные биты в плавании?

Как сказанный Обжимный пресс, Вы не можете освободить его; код, вызывающий функцию, которая возвращает объект, ответственен за уничтожение его.

Это - плохой дизайн кода, между прочим, поскольку он делает его путающий относительно того, кто выделяет и освобождает. Намного лучший способ сделать это состоял бы в том, чтобы сделать, чтобы вызывающая сторона создала объект и передала его в функции. Тем путем код, который создает его также, освобождает его. Что-то вроде этого:

var
  SL: TStringList;
begin
  SL := TStringList.Create;
  try
    ProcToFillStringList(SL);
    //Do something with populated list
  finally
    SL.Free;
  end;
end;

// Note I've made the parameter a TStrings and not a TStringList. This allows
// passing a TMemo.Lines or a TListBox or TComboBox Items as well.
procedure ProcToFillStringList(const SList: TStrings);
  // Do whatever populates the list with SList.Add()
end;

Теперь нет никакого беспорядка по тому, кто делает то, что - тот же код, который создает объект, ответственен за освобождение его. И код, IMO, является намного более четким считать и поддержать.