PROGRAM(tooltips);
// These are the little text strings that pop up when you leave your
// pointer over a button or other widget for a few seconds. 
//
//  Each Tooltips object can contain multiple tooltips for multiple
//  widgets, but only one tooltip per widget. You can have several
//  different tooltip collections, and then enable them one at a time,
//  depending on language or experience settings.
INHERIT(data);
COMPLEX_FUNCTION(create);
// Create a new tooltip collection.
SIMPLE_FUNCTION(enable);
// Enable this tooltip collection
SIMPLE_FUNCTION(disable);
// Disable this tooltip collection
COMPLEX_FUNCTION(set_delay, int);
NAME_ARGS(delay);
// Set the delat (in seconds)
COMPLEX_FUNCTION(set_tip, widget, string, null);
NAME_ARGS(in,to);
// connect the tooltip 'to' tooltip to the widget 'in'.
FUNCTION(set_colors, "function(object,object:object)");
ARGS(GDK.Color,GDK.Color);
NAME_ARGS(foreground,background);
RETURNS(GTK.Tooltips);
// Set the foreground and background colors.
{
  struct object *fg, *bg;
  get_all_args("set_colors", args, "%o%o", &fg, &bg);
  gtk_tooltips_set_colors( GTK_TOOLTIPS( THIS->obj ), 
			   get_gdkobject( fg,Color ),
			   get_gdkobject( bg,Color ) );
  RETURN_THIS();
}
SIMPLE_FUNCTION(force_window);
