|
|
Visits:
2270
(61 on line)
|
Last Update: Dec 22, 2003
|
|
|
|
|
| | |
| Description Inheritance Example Properties Methods |
| |
| Description |
The TGetDir5 Object is used to select directories on your computer
It displays a tree with all existing directories on your network. You can navigate
in the tree and select a directory. You can set the default directory displayed when
this object opens and you can customize the object title. This object returns the
full path of the selected directory |
| Description Inheritance Example Properties Methods |
| |
| Inheritance |
Inherits from: TObject5 |
| Description Inheritance Example Properties Methods |
| |
| Example |
| |
 |
| |
The above form is generated by the following APL+Win Objects™ code: |
'getdir'Świ'*Create' 'TGetDir5'('dir' 'c:\aplwin')('title' 'Choose a directory')
'getdir'Świ'Show'
|
| |
| Description Inheritance Example Properties Methods |
| |
| Properties |
| |
|
| class |
Description: Return current object class
Syntax: class„'obj' Świ 'class' |
| dir |
Description: Get or Set the default directory
Syntax: 'obj' Świ 'dir'path'
path: a valid existing path
Example:
'getdir' Świ 'dir' 'C:\windows\system32' |
| help |
Example:
0 0˝'getdir' Świ '*Create' 'TGetDir5' ('dir' 'c:\aplwin') ('title' 'Choose a directory')
'getdir' Świ 'Show' |
| title |
Description: Get or Set the title bar caption
Syntax: 'obj' Świ 'title'title
title: character string (the dialog title bar caption)
Example:
'getdir' Świ 'title' 'Select a directory' |
|
| Description Inheritance Example Properties Methods |
| |
| Methods |
| |
|
| New |
Description: Create a new instance of TGetDir5
Example:
'obj' Świ '*Create' 'TGetDir5'
|
| Show |
Description: Use common dialog to choose a directory (Win 95,NT,2000,XP only)
Syntax: dir„'obj' Świ 'Show'
dir: the chosen directory (full path) or '' if user exited with Esc
Note: MUST be called on a separate line (NOT on the line where the TGetDir5 object is created)
Example:
'getdir' Świ 'Show' |
|
| Description Inheritance Example Properties Methods |
| |
|
TGetDir5 