ROOT_528-00b_version: test/GetWebHistogram.C Source File

00001 void GetWebHistogram()
00002 {
00003    // example of script called from an Action on Demand when a TRef object
00004    // is dereferenced. See Event.h, member fWebHistogram
00005    
00006    const char *URL = "http://root.cern.ch/files/pippa.root";
00007    printf("GetWebHistogram from URL: %s\n",URL);
00008    TFile *f= TFile::Open(URL);
00009    f->cd("DM/CJ");
00010    TH1 *h6 = (TH1*)gDirectory->Get("h6");
00011    h6->SetDirectory(0);
00012    delete f;
00013    TRef::SetStaticObject(h6);
00014 }