Konzeptfrage: Interface oder Messages

[stahli]

Nochmal zwei Anmerkungen:

Wenn Du eine PKW-Liste hast:

Zitat:

PKWListe1
PKW1
PKW2
...
PKW10

dann kann Dein Listview ja auf die kompletten PKWs zugreifen und von mir aus in den Items nur das Kennzeichen und die Farbe darstellen.
Dass im PKW-Objekt noch mehr Daten drin stehen ist ja egal.
Du brauchst jedenfalls kein zweites Datenobjekt PkwReduziertFürListendarstellung.

Und wenn jetzt jeder Listeneintrag einen PKW repräsentiert kannst Du bei der Selektierung eines Eintrages einfach das PKW-Objekt an die bekanntgegebene View weiter geben. Das wäre das Einfachste.

Falls die ListenItems auch selbständige Controls sind (quasi viele Panels untereinander in einer Scrollbox) könntest Du jedes Item auch wieder an das PKW-Objekt binden, welches dann wie die Detail-View arbeitet, nur dass es weniger Informationen darstellt und sich in einer Scrollbox befindet, die die PKW-Liste repräsentiert.

Das ListboxItem wäre dann ebenso ein Beobachter des PKW wie das DetailView.
Bei Änderungsmeldungen zeichnen sich beide neu (mit etwas unterschiedlichem Umfang und Style), wobei es dann keine Rolle spielt, in welchem Umfeld sich die Controls befinden.


Die Beobachterliste kann man denkbar einfach realisieren.

Im Datenobjekt einfach:

Delphi-Quellcode:

TPKWData = class...
  fObserverList: TList;
  procedure RegisterObserver(aObserver: TObject);
  procedure UnregisterObserver(aObserver: TObject);
  procedure ObserverInfo;

...

procedure TPKWData.ObserverInfo;
begin
  for I := 0 to fObserverList.Count - 1 do
  begin 
    O := TObject(fObserverList[I]);
    if (O is TMyListBox) then
      (O as TMyListBox).RefreshData; 
    if (O is TMyListBoxItem) then
      (O as TMyListBoxItem).RefreshData; 
    if (O is TMyDetailView) then
      (O as TMyDetailView).RefreshData; 
  end;
end;

Wenn man mit Interfaces arbeitet kann man sich das casten an der Stelle ersparen aber wenn man nur wenige Klassen an Beobachtern hat bleibt es auch so ganz übersichtlich. Interfaces bringen ja auch einen Aufwand mit sich.

Wichtig ist natürlich, dass die Beobachtercontrols irgendwie über die Änderungen informiert werden können. Evtl. könnte auch ein Refresh reichen oder man spendiert wie oben eine eigene Methode oder man reagiert auf Messages oder was auch immer.

Wichtig ist m.E. dass die Kommunikation zwischen den Controls möglichst vermieden wird.