Ups...
sorry, did not tested this before posting it:

This.AddObject('OutlookApplication','Outlook.Application')

Actually it does not work...
But I have wished to... <g>... maybe for VFP .NextRelease