|
|
| MVC/Model.pm |
sub register {
my ($self, $viewer) = @_;
$self->{viewers}->{$viewer} = $viewer;
}
sub deregister {
my ($self, $viewer) = @_;
delete $self->{viewers}->{$viewer};
}
sub update {
my ($self) = @_;
foreach my $viewer (values %{$self->{viewers}}) {
$viewer->update($self);
}
}
1;
|
![]() | Neu hinzukommene Viewer können sich mit register
registrieren und dies später mit deregister
rückgängig machen.
|
![]() | Klassen, die von MVC::Model abgeleitet sind,
müssen update aufrufen, wenn sich der Zustand
in einer von außen sichtbaren Weise verändert hat.
|
![]() | Alle von MVC::Viewer abgeleiteten Klassen benötigen
eine Methode update, die für die Synchronisation
des aktuellen Zustands eines Modells mit der Präsentierung
verantwortlich ist.
|
|
| Copyright © 1996, 1998, 1999, 2000 Andreas Borchert, in HTML konvertiert am 07.02.2000 |