summaryrefslogtreecommitdiffstats
path: root/Mac/Modules/ctl/ctlscan.py
diff options
context:
space:
mode:
authorJack Jansen <jack.jansen@cwi.nl>1999-12-09 16:03:50 (GMT)
committerJack Jansen <jack.jansen@cwi.nl>1999-12-09 16:03:50 (GMT)
commit229c0868fe76eb83a74fdd6547cc119f1ff24eed (patch)
tree3278eeda66be6d70bbe2a534e34c0861407a4eb6 /Mac/Modules/ctl/ctlscan.py
parent4d56ecf69094824e408ab0be2e5b68ba4b1d9151 (diff)
downloadcpython-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.py15
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