TPreviewFileDialog
pt
WSRegisterClass
pt
CreatePreviewControl
pt
InitPreviewControl
Execute
Create