TFileSaveAs

pt 

GetDialogClass

 

TFileAction

pt 

GetDialog

 

TCommonDialogAction

pt 

DoAccept

pt 

DoBeforeExecute

pt 

DoCancel

pt 

GetDialogClass

pt 

CreateDialog

 

Create

 

Handlestarget

 

ExecuteTarget