Allow an (optional) tracking function (or -1) to be specified to

TrackControl. TrackControl is now manually generated (too much work to
explain this to bgen).
This commit is contained in:
Jack Jansen 1998-05-28 14:20:09 +00:00
parent d3dbb38e98
commit 848250c15b
3 changed files with 166 additions and 41 deletions

View file

@ -41,6 +41,7 @@ class MyScanner(Scanner):
'DisposeControl', # Generated manually
'KillControls', # Implied by close of dialog
'SetCtlAction',
'TrackControl', # Generated manually
'kControlBevelButtonCenterPopupGlyphTag', # Constant with funny definition
'kControlProgressBarIndeterminateTag', # ditto
# The following are unavailable for static 68k (appearance manager)
@ -76,11 +77,11 @@ class MyScanner(Scanner):
("long", "*", "OutMode")],
[("VarVarOutBuffer", "*", "InOutMode")]),
# For TrackControl
([("ProcPtr", "actionProc", "InMode")],
[("FakeType('(ControlActionUPP)0')", "*", "*")]),
([("ControlActionUPP", "actionProc", "InMode")],
[("FakeType('(ControlActionUPP)0')", "*", "*")]),
## # For TrackControl
## ([("ProcPtr", "actionProc", "InMode")],
## [("FakeType('(ControlActionUPP)0')", "*", "*")]),
## ([("ControlActionUPP", "actionProc", "InMode")],
## [("FakeType('(ControlActionUPP)0')", "*", "*")]),
([("ControlHandle", "*", "OutMode")],
[("ExistingControlHandle", "*", "*")]),