SCSelectOption

SeasideTesting-Form Components

Comment: 






Hierarchy:




ProtoObject

Object

SCXMLElementWrapper


SCSelectOption











Summary:






instance variables:








label

selectInput

value











methods:








instance
class


accessing

initialize

processing

request


instance creation






Detail:






instance variables:








label








inferredType:
UndefinedObject










selectInput








inferredType:
UndefinedObject










value








inferredType:
UndefinedObject












instance methods:








accessing




label







	^label












initialize




initializeForSelect: aSelect fromXMLElement: element






 
	super initializeFromXMLElement: element.
	value _ element attributeAt: 'value'.
	label _ element contents first string.
	selectInput _ aSelect.
	(element attributes includesKey: 'selected')
		ifTrue: [selectInput selectedOptions add: self]












processing




select







	selectInput optionSelected: self












request




addToRequestStream: aStream






 
	aStream nextPutAll: selectInput name;
		 nextPut: $=;
		 nextPutAll: value.
	^ true












class methods:








instance creation




forSelect: aSelect fromXMLElement: anXMLElement






 
	^ self new initializeForSelect: aSelect fromXMLElement: anXMLElement











^top






- made by Dandelion -