Up

_gtkLabelCBlink

_gtkLabelCBlink define the signal which gets emitted to activate an URI in a Label object.

Prototype : fun [ObjGtkLabel fun [ObjGtkLabel u0 S S] u1 u0 I] ObjGtkLabel

• ObjGtkLabel : the Label object.


• fun [ObjGtkLabel u0 S S] u1 : the callback to call.
  • ObjGtkLabel : the same Label
  • u0 : an user parameter, at your convenience
  • S : the signal name ("activate-link")
  • S : the activated URI


• u0 : the user parameter.


• I : the propagate signal flag (SIGNAL_NOPROPAGATE or SIGNAL_PROPAGATE)


• Return ObjGtkLabel : the same Label object or nil if an error occurs.

See also

Example

typeof win = ObjGtkWindow;;
typeof box = ObjGtkBox;;
typeof label = ObjGtkLabel;;

fun CBdestroy (obj, u, eventName)=
	_fooS eventName;
	_gtkMainQuit;
	_closemachine;
	0;;
	
fun CBlink (widget, user_parameter, event_name, uri)=
	_fooS event_name;
	_fooS uri;
	_fooId user_parameter;
	0;;
	
fun main ()=
	_showconsole;
	
	set win = _gtkWindowNew _channel nil "test buttons" 0;
	
	set box = _gtkBoxNew _channel 1 5 VERTICAL;
	
	set label = _gtkLabelNew _channel;
	_gtkLabelSet label 
		"Go to the <a href=\"http://www.scolring.org\" title=\"Scol official website\">Scolring</a> for more information about this language" 
		LABEL_SET_MARKUP;
	_gtkLabelCBlink label @CBlink 12 SIGNAL_PROPAGATE;
	
	_gtkBoxAdd box label 1 1 5 1;
	_gtkContainerAdd win box;
	
	_gtkWidgetShowAll win;

	_gtkWidgetCB win @CBdestroy 0 SIGNAL_PROPAGATE "delete-event" nil;

	_gtkMain;
	0;;