88 lines
1.5 KiB
Racket
88 lines
1.5 KiB
Racket
#lang scribble/manual
|
|
@(require (for-label racket))
|
|
|
|
@title{SimpleController}
|
|
Controller according to the model-view-controller (M-V-C) paradigm@section{categories}
|
|
Core
|
|
@section{related}
|
|
Classes/Object
|
|
|
|
@section{description}
|
|
|
|
|
|
SimpleController can be used as a controller according to the model-view-controller (M-V-C) paradigm. It provides an
|
|
link::Classes/IdentityDictionary:: of actions, which are called whenever the attached model sends a notification by
|
|
calling changed.
|
|
|
|
|
|
@section{CLASSMETHODS}
|
|
|
|
|
|
@section{METHOD}
|
|
new
|
|
Creates a SimpleController instance with the model to be observed.
|
|
|
|
@section{argument}
|
|
model
|
|
An object of any class
|
|
|
|
|
|
@section{INSTANCEMETHODS}
|
|
|
|
|
|
@section{private}
|
|
init, update
|
|
|
|
@section{METHOD}
|
|
put
|
|
|
|
@section{argument}
|
|
what
|
|
Register an action, which is called when the model invokes changed(what, moreArgs).
|
|
|
|
@section{argument}
|
|
action
|
|
|
|
Action to register.
|
|
|
|
|
|
@section{METHOD}
|
|
remove
|
|
|
|
Remove a registered action.
|
|
|
|
@section{argument}
|
|
action
|
|
|
|
Action to remove
|
|
|
|
@section{EXAMPLES}
|
|
|
|
|
|
|
|
@racketblock[
|
|
(
|
|
var controller, model, view;
|
|
|
|
model = Ref(0.5);
|
|
controller = SimpleController(model);
|
|
controller.put(\value,
|
|
{|theChanger, what, moreArgs|
|
|
view.value_(theChanger.value);
|
|
});
|
|
|
|
view = Slider(Window("slider", Rect(100, 100, 330, 38)).front, Rect(5, 5, 320, 20));
|
|
view.onClose_{controller.remove};
|
|
|
|
// run a routine to change the model's value:
|
|
r{
|
|
100.do{
|
|
model.value_(1.0.rand.postln).changed(\value);
|
|
0.5.wait;
|
|
}
|
|
}.play(AppClock)
|
|
)
|
|
::
|
|
]
|
|
|
|
|