Pascal 7 & Objects


         

TFileDialog модуль OStdDlgs


-----------------------------------------------------------------

TObject TWindowsObject +------+ +----------------------------------------+ +------| | ChildList Parent | |-Init-| | Flags Status | |-Done-| | HWindow TransferBuffer | | Free | | Instance | +------+ +----------------------------------------| |-Init-------- GetChildren | |-Load-------- -GetClassName-------| | Done GetClient | | AddChild -GetId--------------| | At GetSiblingPtr | | Canclose -GetWindowClass-----| | ChildWithId IndexOf | | CloseWindow IsFlagSet | | CMExit Next | |-Create------ Previous | | CreateChildren PutChildPtr | | CreateMemoryDC PutChildren | | DefChildProc PutSiblingPtr | | DefCommandProc -Register-----------| | DefNotificationProc RemoveChild | |-DefWndProc-- SetFlags | | Destroy -SetupWindow--------| | Disable Show | | DisableAutoCreate -Store--------------| | DisableTransfer Transfer | | DispatchScroll TransferData | | Enable -WMActivate---------| | EnableAutoCreate WMClose | | EnableKBHandler WMCommand | | EnableTransfer WMDestroy | | FirstThat -WMNScroll----------| | Focus WMNCDestroy | | ForEach WMNQueryEndSession | | GetChildPtr -WMVScroll----------| +----------------------------------------+

TDialog TFileDialog +-------------------+ +-----------------+ | Attr | | Caption | | IsModal | | Extension | +-------------------| | FilePath | |-Init--------------| | FileSpec | | Load | | PathName | | Done | +-----------------| | Create | | Init | | DefWndProc | | CanClose | | EndDlg | | HandleDList | | Execute | | HandleFList | | GetItemHandle | | HandleFName | | Ok | | SetupWindow | | SendDlgItemMsg | +-----------------+ | Store | | WMClose | | WMInitDialog | | WMPostInvalid | | WMQueryEndSession | +-------------------+

Файловые диалоговые блоки позволяют пользователю выбрать файл для открытия или указать имя файла для сохранения.



Содержание  Назад  Вперед