How to show OpenFile Dialog in preview mode

To show a simple OpenFile Dialog is quite easy - you can fill it structure and call GetOpenFileNameA() API. Good sample is on the AccessWeb.
But if you want to let user open picture and show him preview in OpenFile Dialog? Then you have to use Office FileDialog function. A good sample of using it together with sample database is on the Access & VBA FAQ of MVP Juan M. Afán de Ribera