https://github.com/root-project/root
Tip revision: ff680da7362578b92fdfa78619806a218f1a30d8 authored by Fons Rademakers on 24 October 2007, 15:26:47 UTC
tag release v5-12-00h.
tag release v5-12-00h.
Tip revision: ff680da
THbookKey.cxx
// @(#)root/hbook:$Id$
// Author: Rene Brun 20/02/2002
/*************************************************************************
* Copyright (C) 1995-2002, Rene Brun and Fons Rademakers. *
* All rights reserved. *
* *
* For the licensing terms see $ROOTSYS/LICENSE. *
* For the list of contributors see $ROOTSYS/README/CREDITS. *
*************************************************************************/
#include "THbookKey.h"
#include "THbookTree.h"
#include "TBrowser.h"
ClassImp(THbookKey)
//______________________________________________________________________________
THbookKey::THbookKey(Int_t id, THbookFile *file)
{
//constructor
fDirectory = file;
fID = id;
char name[10];
sprintf(name,"h%d",id);
SetName(name);
}
//______________________________________________________________________________
THbookKey::~THbookKey()
{
}
//______________________________________________________________________________
void THbookKey::Browse(TBrowser *b)
{
// Read object from disk and call its Browse() method.
// If object with same name already exist in memory delete it (like
// TDirectory::Get() is doing), except when the key references a
// folder in which case we don't want to re-read the folder object
// since it might contain new objects not yet saved.
fDirectory->cd();
TObject *obj = fDirectory->GetList()->FindObject(GetName());
if (obj && !obj->IsFolder()) {
if (obj->InheritsFrom(TCollection::Class()))
obj->Delete(); // delete also collection elements
delete obj;
obj = 0;
}
if (!obj)
obj = fDirectory->Get(fID);
if (b && obj) {
obj->Browse(b);
b->SetRefreshFlag(kTRUE);
}
}
//______________________________________________________________________________
Bool_t THbookKey::IsFolder() const
{
//an hbook key is not a folder
Bool_t ret = kFALSE;
return( ret );
}