Delphi
TfgProgressBarMessage = class (TfgControlMessages)
TObject -> TfgControlMessages -> TfgProgressBarMessage