diff options
author | Jack Jansen <jack.jansen@cwi.nl> | 1999-12-09 16:03:50 (GMT) |
---|---|---|
committer | Jack Jansen <jack.jansen@cwi.nl> | 1999-12-09 16:03:50 (GMT) |
commit | 229c0868fe76eb83a74fdd6547cc119f1ff24eed (patch) | |
tree | 3278eeda66be6d70bbe2a534e34c0861407a4eb6 /Mac/Modules/ctl/ctlscan.py | |
parent | 4d56ecf69094824e408ab0be2e5b68ba4b1d9151 (diff) | |
download | cpython-229c0868fe76eb83a74fdd6547cc119f1ff24eed.zip cpython-229c0868fe76eb83a74fdd6547cc119f1ff24eed.tar.gz cpython-229c0868fe76eb83a74fdd6547cc119f1ff24eed.tar.bz2 |
Changes by Corran Webster to support {Get,Set}ControlData and
HandleControlClick. Untested.
Diffstat (limited to 'Mac/Modules/ctl/ctlscan.py')
-rw-r--r-- | Mac/Modules/ctl/ctlscan.py | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/Mac/Modules/ctl/ctlscan.py b/Mac/Modules/ctl/ctlscan.py index aba07c5..fd060c0 100644 --- a/Mac/Modules/ctl/ctlscan.py +++ b/Mac/Modules/ctl/ctlscan.py @@ -42,6 +42,9 @@ class MyScanner(Scanner): 'KillControls', # Implied by close of dialog 'SetCtlAction', 'TrackControl', # Generated manually + 'HandleControlClick', # Generated manually + 'SetControlData', # Generated manually + 'GetControlData', # Generated manually 'kControlBevelButtonCenterPopupGlyphTag', # Constant with funny definition 'kControlProgressBarIndeterminateTag', # ditto # The following are unavailable for static 68k (appearance manager) @@ -58,6 +61,10 @@ class MyScanner(Scanner): 'SetDisclosureTriangleLastValue', # Unavailable in CW Pro 3 libraries 'SetUpControlTextColor', + # Generally Bad News + 'GetControlProperty', + 'SetControlProperty', + 'GetControlPropertySize', ] def makeblacklisttypes(self): @@ -72,21 +79,21 @@ class MyScanner(Scanner): return [ ([("void_ptr", "*", "InMode"), ("long", "*", "InMode")], [("InBuffer", "*", "*")]), - + ([("void", "*", "OutMode"), ("long", "*", "InMode"), ("long", "*", "OutMode")], [("VarVarOutBuffer", "*", "InOutMode")]), - + ## # For TrackControl ## ([("ProcPtr", "actionProc", "InMode")], ## [("FakeType('(ControlActionUPP)0')", "*", "*")]), ## ([("ControlActionUPP", "actionProc", "InMode")], ## [("FakeType('(ControlActionUPP)0')", "*", "*")]), - + # For GetControlTitle ([('Str255', 'title', 'InMode')], [('Str255', 'title', 'OutMode')]), - + ([("ControlHandle", "*", "OutMode")], [("ExistingControlHandle", "*", "*")]), ([("ControlRef", "*", "OutMode")], # Ditto, for Universal Headers |