How to BOLD(t) your problem

[sakura]

Ready to roll...

Okay, genug des Vorwortes, wollen wir mal Delphi einen Ruck geben und loslegen Man starte D7A oder eine andere Version von Delphi, wenn man BfD besitzt

Erstellt eine neue Anwendung und speichert diese an einem beliebigen Ort auf Eurer Festplatte. Da wir die Logik von Design trennen wollen, tun wir dieses auch in Delphi, also erstellen wir zusätzlich ein leeres Datenmodul und speichern dieses. Diesem DataModule gebe ich den Namen dtmBoldContainer

In das Datenmodul werden folgende Bold-Komponenten eingefügt:

• TBoldModel (Palette: Bold Handles); Name bldModel; Diese Komponente speichert unser UML-Modell, welches wir später bearbeiten werden.
• TBoldSystemTypeInfoHandle (Palette: Bold Handles); Name bldSystemTypeInfoHandle; Diese Komponente speichert die UML-Informationen so, daß zur Laufzeit unserer Anwendung möglichst schnell auf die Informationen zugegriffen werden kann, die nötig sind, damit sich unsere Anwendung an die festgelegte Businesslogik hält.
• TBoldSystemHandle (Palette: Bold Handles); Name bldSystemHandle; Diese Komponente wird zur Designzeit von Bold benötigt, um die Businesslogik zu präsentieren.
• TBoldPersistenceHandleFileXML (Palette: Bold Persistence); Name bldPersistenceHandleFileXML; Sollen die Daten unserer Anwendung gesichert werden, benötigen wir ein Möglichkeit diese "persistent" zu machen, diese zu speichern. Diese Komponente ermöglicht die Speicherung der Daten im XML-Format.

Das Datenmodul sollte ähnlich wie folgende Grafik ausschauen.

Jetzt müssen die Komponenten noch mit einander verknüpft werden. Die genaue Verbindung zueinander könnt Ihr der folgenden Grafik entnehmen. Diese Verknüpfungen können im Objekt Inspektor gesetzt werden. Zusätzlich sollte weitere Eigenschaften im Objekt Inspektor gesetzt werden.

• bldSystemTypeInfoHandle.BoldModel := bldModel;
• bldSystemTypeInfoHandle.UseGeneratedCode := False;
• bldSystemHandle.SystemTypeInfoHandle := bldSystemTypeInfoHandle;
• bldSystemHandle.PersistenceHandle := bldPersistenceHandleFileXML;
• bldSystemHandle.AutoActivate := True;
• bldPersistenceHandleFileXML.BoldModel := bldModel;
• bldPersistenceHandleFileXML.FileName := 'contacts.xml';

......