Fix from Anna - call TCanvas::SupportAlpha and test gPad is not null.

Thanks to Bertrand for finding this.