Unit: |
SDL_filesys |
Class: |
TUnivSaveDialog |
Declaration: |
TOnForbiddenDirEvent = procedure (Sender: TObject; Path: string; var ForbiddenDirReply: TModalResult) of object; |
The type declaration TOnForbiddenDirEvent declares the OnForbiddenDir event which occurs if the selected directory for storing the file is equal to the forbidden directory or a subdirectory of it. The parameter Path contains the full path of the forbidden directory. The variable parameter ForbiddenDirReply has to be set to one of the following values: mrYes, mrNo, or mrCancel. Any other value will raise an exception.
|