TLazSaveDialog
pt
DoInitialize
TLazOpenDialog
pt
WSRegisterClass
pt
DoExecute
pt
DoInitialize
Create