home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 11 Util
/
11-Util.zip
/
fdlg.zip
/
LOAD_WIN.CLS
< prev
next >
Wrap
Text File
|
1996-02-02
|
896b
|
43 lines
" ---- Ronald Brill 1995, 1996 ---- "
" ---- Extended File Dialogs Version 2.1 ---- "
LoadClassDialogController SecondaryFile !
!LoadClassDialogController class methods !
initialize
self name: #LoadClassDialog.
!"end initialize"
!"End of LoadClassDialogController class methods block"
!LoadClassDialogController methods !
createItems
| temp |
super createItems.
self add: #cReload
class: FormCheckBox
rect: {735 1200 250 98}
options: {#Tab #Backtab #Return}
form: self mainForm
text: '&Reload'.
temp := IdentityDictionary new.
temp at: #Altr put: #mReload.
temp at: #AltR put: #mReload.
self on: #wmButton3DblClkAt: for: vFileList
action: (Action receiver: self send: #openFileDblClicked2).
self mainForm acceleratorTableAddAll: temp.
!"end createItems"
!"End of LoadClassDialogController methods block"