Gtk-Perl
view release on metacpan or search on metacpan
Bonobo/xs/BonoboWidget.xs view on Meta::CPAN
char * goad_id
CORBA::Object uih
CODE:
RETVAL = bonobo_widget_new_control (goad_id, uih);
OUTPUT:
RETVAL
Gtk::Widget_OrNULL_Up
bonobo_widget_new_control_from_objref (Class, control, uih)
SV * Class
CORBA::Object control
CORBA::Object uih
CODE:
RETVAL = bonobo_widget_new_control_from_objref (control, uih);
OUTPUT:
RETVAL
Gnome::BonoboControlFrame
bonobo_widget_get_control_frame (bw)
Gnome::BonoboWidget bw
Gtk::Widget
bonobo_widget_new_subdoc (object_desc, uih)
char * object_desc
CORBA::Object uih
Gnome::BonoboItemContainer
bonobo_widget_get_container (bw)
Gnome::BonoboWidget bw
Gnome::BonoboClientSite
bonobo_widget_get_client_site (bw)
Gnome::BonoboWidget bw
Gnome::BonoboViewFrame
bonobo_widget_get_view_frame (bw)
Gnome::BonoboWidget bw
CORBA::Object
bonobo_widget_get_uih (bw)
Gnome::BonoboWidget bw
void
bonobo_widget_set_property (control, first_prop, ...)
Gnome::BonoboWidget control
char * first_prop
CODE:
{
int i;
if ((items-1)%2)
croak("set_property requires (name, value) pairs");
for (i=1; i <items-1; i+=2)
getset_prop_value(control, SvPV(ST(i), PL_na), ST(i+1));
}
void
bonobo_widget_get_property (control, first_prop, ...)
Gnome::BonoboWidget control
char * first_prop
PPCODE:
{
int i;
EXTEND(SP, items-1);
for (i=1; i <items; i++)
PUSHs(sv_2mortal(getset_prop_value(control, SvPV(ST(i), PL_na), NULL)));
}
#endif
( run in 0.754 second using v1.01-cache-2.11-cpan-5511b514fd6 )