|
Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
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-OBSERVER-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.
Fichier Zip
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
Télécharger le zip
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,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... DBGRID AVEC ZONE DE RECHERCHE,TRI,FLECHES,MEMOS,MOLETTE,COUL...
Sources de la même categorie
Sources en rapport avec celle ci
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
delphi et VCL [ par TheWhiteShadow ]
question:est il possible de faire un ptit exe (genre 30K) en utilisant la VCL de delphi, avec une dépendance en plus genre DLL? (c++ builder de borlan
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
|
Téléchargements
Logiciels à télécharger sur le même thème :
Comparez les prix Nouvelle version

HTC Touch HD
Entre 25€ et 605€
|