Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Wann ist die Zeit für eine eigene VCL-Komponente gekommen? (https://www.delphipraxis.net/175373-wann-ist-die-zeit-fuer-eine-eigene-vcl-komponente-gekommen.html)

Der schöne Günther 17. Jun 2013 17:45

AW: Wann ist die Zeit für eine eigene VCL-Komponente gekommen?
 
Puh, das ist jetzt genau das Gegenteil von dem, was ich eigentlich glaubte, tun zu sollen: Für dieses spezielle Objekt eine Komponente basteln, die einen Verweis auf das zu visualisierende Objekt hat, sich von diesem ein paar Daten holt und diese darstellt (eben wie das Ampel-Beispiel).

Klar, wenn ich jetzt anfange, an dem Objekt herumzufummeln und Dinge zu modifizieren - Dann sehe ich das ein. Aber nehmen wir an, ich hätte bislang ein gutes Tutorial über Interfaces in Delphi gefunden. Und ich versemmele es nicht, das Interface später ändern zu müssen. Und ich nutze eh nur Methoden, um passiv Dinge auszulesen. Dann fehlt mir die Fantasie, dort später Probleme zu sehen. :|

nahpets 17. Jun 2013 18:14

AW: Wann ist die Zeit für eine eigene VCL-Komponente gekommen?
 
Das mit den Komponenten ist halt ein bisserl Geschmacksache.

Für Fachsoftware habe ich auch schon Komponenten erstellt, die die Fachlogik enthielten. Es gab eine Basisklasse und eine Reihe von abgeleiteten Klassen. Die Basisklasse machte den "Verkehr" vom Objekt in die Datenbank und umgekehrt, die abgeleiteten Klassen waren für die fachliche Logik zuständig.

Die optische Darstellung war streng getrennt, d. h.: Die Daten aus den Komponenten wurden durch entsprechende Methoden in die GUI gebeamt bzw. auch der umgekehrte Weg.

Die Komponenten der einzelnen Fachanwendungen werden pro Fachanwendung in ein Package gepackt. In den Projekteinstellungen kann man (zumindest bei Delphi 7) konfigurieren, welche Packages man nutzen will. Es besteht hier meiner Meinung nach kein Problem mit Versionen. Das Package und die Komponenten gehören zusammen mit der Fachanwendung in die Versionsverwaltung und werden mit der Fachanwendung aus der Versionsverwaltung gezogen. Versionswirrwarr kann hierbei nicht entstehen.

Sicherlich hätte ich hier auch ohne Komponenten auskommen können und einfache Klassen schreiben und nutzen können, aber durch die Komponenten waren diese recht einfach in einem Package zusammenzufassen und die einzelnen Fachbausteine (also Komponenten) standen in der Komponentenpalette zur verfügung.

Wenn Komponenten auch Fachlogik enthalten, dann muss man halt wissen, dass diese Komponente nur für eine spezielle Fachanwendung zu nutzen ist. Dies ist ein organisatorisches Problem.

stahli 17. Jun 2013 18:17

AW: Wann ist die Zeit für eine eigene VCL-Komponente gekommen?
 
@sx2008
Ich kann Dir nicht ganz folgen. Von Geschäftslogik in GUI-Controls hat bisher niemand gesprochen - wenngleich die Ablehnung dergleichen völlig richtig ist.
Wenn passende Komponenten verfügbar sind wird man die natürlich nicht nochmal neu erfinden.
Andernfalls kann man sie einmal erststellen und immer wieder verwenden.
Es macht letztlich keinen Unterschied ob die TLEDArray irgendwoher bezogen oder selbst entwickelt wird.

GUI-Controls sollten ihrerseits so allgemein gehalten sein, dass sie nicht an eine bestimmte Geschäftslogik-Version gebunden sind.
Wenn Du davon ausgehst, dass die Controls ständig mitwachsen und Du auch alte Versionen benutzen willst, dann würde ich die Controls generell dynamisch erzeugen und in der Versionsverwaltung aufnehmen.


@SchönerGünther
Ich denke, Du kannst hier Interfaces (im Sinne von Delphi-Interfaces) erst mal außen vor lassen.
Ob Du Deinem Control ein Objekt oder ein Interface übergibst ist im Grunde egal. Wenn Du eh nur genau eine Datenklasse für Dein sichtbares Control zuweist, dann kannst Du auch einfach das Objekt übergeben.
Interfaces braucht man, wenn man unterschiedliche Klassen mit definierten Schnittstellen benutzen will oder mit DLL´s kommuniziert. (würde ich jetzt so zusammenfassen)

Furtbichler 17. Jun 2013 19:23

AW: Wann ist die Zeit für eine eigene VCL-Komponente gekommen?
 
Ich persönlich halte nicht viel von selbstgebauten Spezialkomponenten, außer, sie sind allgemeingültig. Ich persönlich habe meine Komponentensammlungen und mehr kommt mir nicht dazu.

Im Endeffekt haben wir es hier doch 'nur' mit einer Darstellung zu tun, die selbst keine Funktionalität beinhaltet, oder?

Die Lösung mit dem DrawGrid ist doch ok, findest Du nicht? Großartig anders wird eine eigene Komponente auch nicht aussehen.

Was Du hier -und das haben ja schon alle gesagt- betreiben musst, ist eher die Trennung von Darstellung und Logik. Nicht, das man das machen müsste, aber wenn Du das machst (jeder macht das, was er am Besten kann), dann wird das wirklich sauber und -wer weiss- vielleicht kannst Du dann deine DrawGrid-Geschichte (die ich in einen Frame packen würde, wie schon vorgeschlagen) nochmal verwenden.

Sir Rufo 17. Jun 2013 19:27

AW: Wann ist die Zeit für eine eigene VCL-Komponente gekommen?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Also wenn ich mir deine Komponente so ansehe, dann würde ich die mal wie folgt beschreiben
Delphi-Quellcode:
unit MyControl;

TMyControlItem = class( ... )
  property Caption : string;
  property Color : TColor;
end;

TMyControl = class( ... )
published
  property BorderColor : TColor;
  property BorderWidth : Integer;
  property ItemCount : Integer;
  property Items[Index : Integer] : TMyControlItem;
end;
Dein DatenObjekt sieht nun wohl irgendwie so aus:
Delphi-Quellcode:
unit Data;

TDataChild = class
  property On : Boolean;
end;

TData = class
  // Sigalisierung bei Änderungen über einen Event
  property OnChange : TNotifyEvent;
  // oder eine Event-Liste ;)
  procedure AddOnChange( ANotify : TNotifyEvent );
  procedure RemOnChange( ANotify : TNotifyEvent );

  property On : Boolean;
  property ChildCount : Integer;
  property Childs[Index : Integer] : TDataChild;
end;
Für die Visualisierung baust du dir jetzt einfach einen abstrakten Presenter zwischen dem Objekt und irgendeinem Control
Delphi-Quellcode:
unit DataPresenter;

uses
  Data;

TDataPresenter = class abstract
  // Diese Methode soll aufgerufen werden, wenn Data sich ändert
  procedure DataChange( Sender : TObject ); virtual; abstract;
  property Data : TData;
end;
und konkret
Delphi-Quellcode:
unit MyControlDataPresenter;

uses
  DataPresenter,
  MyControl;

TMyControlDataPresenter = class( TDataPresenter )
  constructor Create( AControl : TMyControl );
  procedure DataChange( Sender : TObject ); override;
  property OnColor : TColor;
  property OffColor : TColor;
  property NilColor : TColor;
end;
P.S. Wenn du Spring4D im Einsatz hast, da gibt es
Delphi-Quellcode:
Event<T>
der einem einen MultiCast-Event auf die Schnelle hinzaubert :)

P.S.S. Im Anhang mal eine kleine Demo nach diesem Muster und der Präsentation in einem StringGrid


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:38 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz