Schon wieder: Warum Interfaces

[DeddyH]

Ob ich nun Supports() aufrufen muss oder Dinge der Art

Delphi-Quellcode:

if MyObject is TDingens then
  TDingens(myObject).Machwas;

, komfortabler wird es nicht.

[edit] Nachtrag: stahli hat Recht, man kann das übrigens auch anders formulieren.

Delphi-Quellcode:

Supports(Test, IIntf2, Intf2);
if Assigned(Intf2) then
  Intf2.SomeMethod3;

[/edit]

[Aviator]

Hmm, ja stimmt auch wieder.

Was sagt denn der TE "Exilant" mittlerweile zu dem Thema? Ist das alles jetzt etwas verständlicher?

[exilant]

Zitat von Aviator:

Was sagt denn der TE "Exilant" mittlerweile zu dem Thema? Ist das alles jetzt etwas verständlicher?

Zunächst mal vielen Dank an alle Schreiber hier. Eine Menge Input. So eine Resonanz habe ich nicht erwartet. Das Thema treibt doch viele um. Wie weit mich das weiter gebracht hat kann ich noch nicht abschätzen. Ich muss mir das erst mal in Ruhe zu Gemüte führen. Dazu werde ich etwas Zeit brauchen. Dieser Thread wird dazu sehr nützlich sein. Danke auch besonders an stahli, der mich auf diesen Thread hingewiesen hat.

Das mit der "Verständlichkeit" war wie ich geschrieben hatte nicht so das Problem. Interfaces setze ich seit Ewigkeiten für die Office Atomation ein. Ausserdem kommuniziere ich hier mit OPC Servern (nicht UA) - das ist auch COM/DCOM und das klappt. Auch wenn die Programmierung von dem Zeugs eine Strafe ist.

Ich suche/suchte ja nach dem Nutzen von Interfaces in eigenen Anwendungen. Und in denen verzichte ich natürlich auf COM/DCOM und DLLs solange ich es selbst in der Hand habe. Interfaces als wie Lemmy es sagt "logische oder zwingende Weiterentwicklung klassicher OOP" zu sehen: Da muss ich erstmal hinkommen.

Ich denke das in einigen Beiträgen in diesem Thread echtes Gold steckt und mich die Nützlichkeit von Interfaces in eigenen Anwendungen jenseits von COM erkennen lässt. Ich werde lesen, testen und wieder lesen.

Nochmal vielen Dank an alle. Ich werde mich bestimmt noch zu dem Thema melden sowie ich das hier durchgeackert habe. Ich denke da werden noch ein paar Dinge offen bleiben...

[stahli]

Freut mich.

Ein bisschen kann man das vielleicht auch sehen wie die Sinnhaftigkeit der Trennung von Businesslogik und GUI. (Das werden ja hier alle Beteiligten für nützlich halten.)

Interfaces trennen dann verschiedene Teile eines Moduls nochmal klarer voneinander ab und reduzieren noch weitere vorhandene Abhängigkeiten (und verbessern weiter die Übersichtlichkeit).

[hanvas]

Zitat von exilant:

Ich suche/suchte ja nach dem Nutzen von Interfaces in eigenen Anwendungen. Und in denen verzichte ich natürlich auf COM/DCOM und DLLs solange ich es selbst in der Hand habe. Interfaces als wie Lemmy es sagt "logische oder zwingende Weiterentwicklung klassicher OOP" zu sehen: Da muss ich erstmal hinkommen.

Eine Sache die schnell einleuchtet ist das man Methoden von Klassen auf Objekte die aus unterschiedlichen Klassenhyrarchien stammen anwenden kann. Ich finde TFortbewegung2 einfacher zu warten, gut zu verstehen und typsicherer als TFortbewegung1.

Code:

type IBeweglich = interface
      end;

     TAuto  = class(TSache,IBeweglich)
     end;

     TVogel = class(TLebendig,IBeweglich)
     end;

     TFortbewegung1=class(TAktion)
     public 
      function begwege(was : TAuto) : Integer; overload;
      function begwege(was : TLebendig) : Integer; overload;
     end;

     TFortbewegung2=class(TAktion)
      function begwege(was : IBeweglich) : Integer;
     end;

cu Ha-Jö

[frapo]

Vielleicht findet man leichter Zugang zu dem Thema, wenn man sich parallel dazu Entwurfsmuster mal ansieht? z.b. https://www.philipphauer.de/study/se...n/strategy.php.

Ein Klassiker für mich wäre eine Anwendung, die verschiedene "Datensenken" verfügbar machen möchte. Beispielsweise möchte man das Speichern in einer oder mehreren Datenbanksystemen möglich machen und/oder auch das Speichern als Plaintext, XML-File, CSV-Datei etc.

Da bietet sich doch die Nutzung von Interfaces gerade zu an.

[bra]

Zitat von DeddyH:

Delphi-Quellcode:

Supports(Test, IIntf2, Intf2);
if Assigned(Intf2) then
  Intf2.SomeMethod3;

Könnte man das nicht kürzen?

Delphi-Quellcode:

if Supports(Test, IIntf2, Intf2) then
  Intf2.SomeMethod3;

[Aviator]

Zitat von bra:

Zitat von DeddyH:

Delphi-Quellcode:

Supports(Test, IIntf2, Intf2);
if Assigned(Intf2) then
  Intf2.SomeMethod3;

Könnte man das nicht kürzen?

Delphi-Quellcode:

if Supports(Test, IIntf2, Intf2) then
  Intf2.SomeMethod3;

Siehe Beitrag von DeddyH. Da hat er es genau so gemacht.

[DeddyH]

Richtig, ich wollte ja nur zeigen, dass es so oder so geht, je nach persönlicher Vorliebe