Accueil > > > UTILISATION DES DATAMODULES ET DE LA VCL POUR IMPLÉMENTER UN PATTERN OBSERVER OU NON
UTILISATION DES DATAMODULES ET DE LA VCL POUR IMPLÉMENTER UN PATTERN OBSERVER OU NON
Information sur la source
Description
Le Pattern observer et une solution générique au probleme suivant : Comment un objet previent-il des observateurs de ses changement. Je retiens deux exemples qui m'ont amené à réfléchir: par Pierre castelain http://castelain.developpez.com/sources/Bouboules/ par delphiProg: http://www.delphifr.com/codes/DESIGN-PATTERN-OBSER VER-IMPLEMENTATION-REUTILISABLE_37338.aspx Les deux cas n'utilisent pas des données issus de sgbd. L'utilisation de la VCL pour l'acces aux données est d'une efficacité redoutable et implementent (on dirait bien) le pattern observer.(un ADOQuery relié à deux controles par exemple). Mais pour un novice savoir gérer la synchronisation des fiches et avec leur source de données avec cohérence est difficile. Je vous présente donc deux procédés de liaison fiche-données qui permettent soit d'implementer le DP observer, soit de l'éviter, par des utilisations differentes des datamodules. Soit un TDatamodule est commun à plusieurs fiches (les fiches de liste des films) Soit chaque fiche possedera un instance différente d'unê même classe de TDatamodule
Source
- //Voici une partie des commentaires laissées dans le code
- unit UVueFilm_Frm;
- {Vue d'un seul film indépendant des autres.
- L'idee est d'associer par composition un data module propre à chaque fiche.
- Ainsi, chaque vue de film sera distincte, même sur le même film (chargé à deux moments différents).
- il s'agit de créer dynamiquement un datamodule que gèrera la fiche du film.
- Ce mécanisme permettra dans le cas de fiches complexes de comparer la nouvelle saisie avec les données initiales, et choisir de valider ou non (moi je n'ai rien implémenté, mais on peut 'jouer' à partir de la liste en édition)
- }
-
- unit UListeFilms_Frm;
- {fiche de liste de film chaque instance sera reliée à la même instance de datamodule
- A la conception, le dataset de la grille de cette fiche, est le datamodule DMUVueListeFilms du module UListeFilms_DM.
- Cette instance du datamodule sera la même pour chaque nouvelle instance de fiche TFrmListeFilms.
- Une modif sur l'une impliquera la modif sur les autres instances. Elles "observent" le datamodule
- Pour une instance nommée du datamodule (DMListeFilms) à l'execution,
- je l'ai ajouté dans la liste des fiches à lancer au chargement,
- mais on pourrait tres bien le déclarer dans la fiche principale et l'instancier ensuite.
- }
-
- unit UMain_Frm;
- {le bouton "Afficher la liste des films dans une nouvelle fenetre"
- permet d'ouvrir une nouvelle fenetre anonyme et pose le probleme de la similarité des données affichées sur l'ensemble des fenetres "listes" }
//Voici une partie des commentaires laissées dans le code
unit UVueFilm_Frm;
{Vue d'un seul film indépendant des autres.
L'idee est d'associer par composition un data module propre à chaque fiche.
Ainsi, chaque vue de film sera distincte, même sur le même film (chargé à deux moments différents).
il s'agit de créer dynamiquement un datamodule que gèrera la fiche du film.
Ce mécanisme permettra dans le cas de fiches complexes de comparer la nouvelle saisie avec les données initiales, et choisir de valider ou non (moi je n'ai rien implémenté, mais on peut 'jouer' à partir de la liste en édition)
}
unit UListeFilms_Frm;
{fiche de liste de film chaque instance sera reliée à la même instance de datamodule
A la conception, le dataset de la grille de cette fiche, est le datamodule DMUVueListeFilms du module UListeFilms_DM.
Cette instance du datamodule sera la même pour chaque nouvelle instance de fiche TFrmListeFilms.
Une modif sur l'une impliquera la modif sur les autres instances. Elles "observent" le datamodule
Pour une instance nommée du datamodule (DMListeFilms) à l'execution,
je l'ai ajouté dans la liste des fiches à lancer au chargement,
mais on pourrait tres bien le déclarer dans la fiche principale et l'instancier ensuite.
}
unit UMain_Frm;
{le bouton "Afficher la liste des films dans une nouvelle fenetre"
permet d'ouvrir une nouvelle fenetre anonyme et pose le probleme de la similarité des données affichées sur l'ensemble des fenetres "listes" }
Conclusion
Ce code n'est fait pour etre fonctionnel, mais pour illustrer la problematique que je me pose. N'ayant pas trop de pratique de developpement, des aspect m'auront échappé ou la pratique exposée est peut etre à éviter dans des contextes de programmtion particuliers, mais elle répond à la problematique :"découpler le code données et le code interface, tout en utilisant la VCL". Le début de solution proposée ici est en fait une utilisation réfléchie des datamodules (sans doute à améliorer d'ailleurs) Un pas est fait, la discussion est ouverte pour pousser le bouchon.
Historique
- 13 mai 2006 16:07:06 :
- Correction du texte de présentation du code.
Sources du même auteur
DBGRID AVEC ZONE DE RECHERCHE,TRI,FLECHES,MEMOS,MOLETTE,COUL...DBGRID AVEC ZONE DE RECHERCHE,TRI,FLECHES,MEMOS,MOLETTE,COULEURS Voici une évolution du PersoDBgrid Posté précédemment.
Ce composant dérivé de TDBGrid réunit un certain nombre de fonctionnalités pour lesquelles d...
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Acceder à l'aide pour 1 nlle VCL sous Delphi [ par Leroy ]
Bonjour Existe-il après l' ajout d'un nouveau paquet de composants une astuce pour que l'aide de ce dernier soit accessible sous delphi avec la classi
Datamodule et accès à partir d'une form [ par manudel ]
Voilà, je voudrais avoir accès aux événements des objets figurant sur mon datamodule, mais je n'y arrive pas. J'ai l'erreur suivante : "le type de l'e
importer composant VCL dans un projet [ par magmados ]
Je dispose des fichiers .pas et .dcr d'un composant. Comment je peux l'inclure dans mon projet. Merci d'avance
pointer sur un datamodule à partir d'un autre exe? [ par francois44 ]
SalutJ'aimerai svoir s'il est possible (si oui comment?) de pointer sur un et un seul datamodule qui serait dans un "exe" principal avec d'autres "exe
différence winforms vcl [ par retaks666 ]
Bonjour, quelles sont les différence entre les winforms et les application vcl? et pourquoi on ne peut utiliser les même composants dans l'u
installation Déploiement d'application [ par retaks666 ]
Bonjour, je cherche a créer un setup pour mon application, qui utilise un alias vers une base de données, et un composant vcl 'vcl skin'. Po
QuickReport + Ado [ par rafraf6 ]
Bonjour,J'ai le code suivant : procedure TForm2.bitPreviewClick(Sender: TObject);begin with DataModule.AdoQ1 do begin &
cloner une table et/ou un datamodule [ par OrsE ]
Salut tout le monde... Comment cloner un TTable et un TDataModule pendant l'exécution? J'ai essayé le constructeur de copie du datamodule, m
Skinner mon application (Sans Vcl) [ par Becracker ]
Salut les gars, Je voudrai juste savoir si qqn d'entre vous sait comment skinner mon application sous delphi en utilisant des skins de format *.skn e
|
Derniers Blogs
[HS] CHROME 6 + MOI = COUP DE GUEULE ![HS] CHROME 6 + MOI = COUP DE GUEULE ! par JeremyJeanson
Attention, le poste qui suit n'est pas la complainte d'une personne : Qui n'aime pas Chrome. D'un anti Google. D'un développeur qui a un poil énorme dans la main. Ceux qui me fréquentent savent que je change de navigateur favori tous les 2 ou 3 mois afin ...
Cliquez pour lire la suite de l'article par JeremyJeanson [WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7[WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7 par Audrey
Lors de la réalisation de ma 2ème application Windows Phone 7, j'ai souhaité utiliser un WrapPanel pour afficher plusieurs photos. Mais le contrôle WrapPanel ne fait pas parti de la liste des contrôles inclus dans le SDK de la version Beta des outils pour...
Cliquez pour lire la suite de l'article par Audrey [WP7] BESOIN D'AVOIR DES DONNéES EN CACHE[WP7] BESOIN D'AVOIR DES DONNéES EN CACHE par Nicolas
Les développeurs ASP.NET ont l'habitude de mettre des données en cache pour éviter de requêter a chaque fois la base de données. Et il est toujours utilie de penser que vos utilisateurs mobiles n'ont pas troujours une super connexion 3G/WIFI et un for...
Cliquez pour lire la suite de l'article par Nicolas [TFS] COMMENT FORCER LA SAISIE D'UN AREA OU ITERATION[TFS] COMMENT FORCER LA SAISIE D'UN AREA OU ITERATION par cyril
Lorsque l'on créé un Work Item dans TFS, il est possible de le classer dans un "area" et dans une "iteration". Dans la plupart des types de projet, un "area" correspond à une catégorie, une "iteration" à un numéro de version. Il est possible de cré...
Cliquez pour lire la suite de l'article par cyril SQL : FONCTIONS D'AGRéGATION MIN/MAX ET VALEURS NULLSQL : FONCTIONS D'AGRéGATION MIN/MAX ET VALEURS NULL par coq
Les fonctions d'agrégation comme MIN et MAX ignorent les valeurs NULL présentes dans le jeu de données sur lequel porte leur calcul, d'où le fameux message d'avertissement : Warning: Null value is eliminated by an aggregate or other SET operation...
Cliquez pour lire la suite de l'article par coq
Logiciels
Bureau de Gestion - ERP Devis Facturation (2.02)BUREAU DE GESTION - ERP DEVIS FACTURATION (2.02)
- Version gratuite du 10/06/2010
Le Bureau de Gestion est un logiciel dédié à la gestion de l'en...
Cliquez pour télécharger Bureau de Gestion - ERP Devis Facturation sDEVIS-FACTURES vlPRO (3.8.0)SDEVIS-FACTURES VLPRO (3.8.0)sDEVIS-FACTURES vlPRO a été mis au point pour permettre besoins des particuliers, créateurs, entr... Cliquez pour télécharger sDEVIS-FACTURES vlPRO LettresFaciles (5.6.0)LETTRESFACILES (5.6.0)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles MyPlanning 2010 (5.6.0)MYPLANNING 2010 (5.6.0)MyPlanning 2010 permet de créer des plannings sous la représentation de diagrammes. Plannings pré... Cliquez pour télécharger MyPlanning 2010 Emicsoft Mac DVD en iPad Convertisseur (3.1.16)EMICSOFT MAC DVD EN IPAD CONVERTISSEUR (3.1.16)Emicsoft Mac DVD en iPad Convertisseur, logiciel professionnel de convertir les fichiers DVD en i... Cliquez pour télécharger Emicsoft Mac DVD en iPad Convertisseur
|