Added as_Resource() method to convert ctl object to res object
diff --git a/Mac/Modules/ctl/Ctlmodule.c b/Mac/Modules/ctl/Ctlmodule.c
index ed37de0..7267cd7 100644
--- a/Mac/Modules/ctl/Ctlmodule.c
+++ b/Mac/Modules/ctl/Ctlmodule.c
@@ -432,6 +432,16 @@
return _res;
}
+static PyObject *CtlObj_as_Resource(_self, _args)
+ ControlObject *_self;
+ PyObject *_args;
+{
+ PyObject *_res = NULL;
+
+ return ResObj_New((Handle)_self->ob_itself);
+
+}
+
static PyMethodDef CtlObj_methods[] = {
{"DisposeControl", (PyCFunction)CtlObj_DisposeControl, 1,
"() -> None"},
@@ -477,6 +487,8 @@
"(SInt32 data) -> None"},
{"GetControlReference", (PyCFunction)CtlObj_GetControlReference, 1,
"() -> (SInt32 _rv)"},
+ {"as_Resource", (PyCFunction)CtlObj_as_Resource, 1,
+ "Return this Control as a Resource"},
{NULL, NULL, 0}
};
diff --git a/Mac/Modules/ctl/ctledit.py b/Mac/Modules/ctl/ctledit.py
new file mode 100644
index 0000000..d877012
--- /dev/null
+++ b/Mac/Modules/ctl/ctledit.py
@@ -0,0 +1,8 @@
+as_resource_body = """
+return ResObj_New((Handle)_self->ob_itself);
+"""
+
+f = ManualGenerator("as_Resource", as_resource_body)
+f.docstring = lambda : "Return this Control as a Resource"
+
+methods.append(f)
diff --git a/Mac/Modules/ctl/ctlsupport.py b/Mac/Modules/ctl/ctlsupport.py
index 245a725..a8b45a5 100644
--- a/Mac/Modules/ctl/ctlsupport.py
+++ b/Mac/Modules/ctl/ctlsupport.py
@@ -82,6 +82,7 @@
functions = []
methods = []
execfile(INPUTFILE)
+execfile('ctledit.py')
# add the populated lists to the generator groups
for f in functions: module.add(f)