Set up a non-modal dialog to select a subdir
my $db = ctkDirDialog::dirDialog('Select one subdir','./');
my $db = ctkDirDialog::dirDialog('Select one subdir','./',$wEntry);
if ($myFolder = ctkDirDialog::getdirDialogResult()) {
} else {
}
- Non standard widget!
- Class variables
-
DTW, DTL, DT, DTOK, DTCancel work
dirDialog
dirDialogSubdir
dirDialogEntry
- Methods
-
cleanPath
createOneDir
-
dirDialog
dirDialogModal
dirDialogOnCreateSubdir
dirDialogOnDTCancel
dirDialogOnDTCancelModal
dirDialogOnDTOK
dirDialogOnDTOKModal
dirDialogOnDTTree
dirDialogOnDTTreeModal
getdirDialogResult
Author: marco
date: 05.10.2006
History
05.10.2006 mam First draft
This method provides the same functionality as dirDialog
but in modal mode.
Set up non-modal dialog
Arguments
- title title
- start dir starting folder
- entry receiving entry widget, optional
Return
- ref to toplevel widget or undef.
Example :
$button->configure (-command [sub {
my $w =&ctkDirDialog::dirDialogModal;
$w->Show;
},
"Select folder",
'.',
$entry
]);
Note: result of the selection must be withdraw with
ctkDirDialog::getdirDialogResult
This method returns the value of the selected folder.
Performs some edit operations on the given folder:
- eliminate double separators replacing them with a single separator,
- replace '/' with the separator used by the runnning OS,
- change case of drive letter to low case.
This method allocates the given folder using mkdir.
It returns the return code of mkdir.