TLazSaveDialog

pt 

DoInitialize

 

TLazOpenDialog

pt 

WSRegisterClass

pt 

DoExecute

pt 

DoInitialize

 

Create