Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.736 Beiträge
Delphi 6 Enterprise
|
AW: TADOConnection auf anderem Datenmodul wie TADOQuery
3. Dez 2014, 09:11
Hätte statt
ADOQuery := TADOQuery(DM_Systemoptionen.FindComponent(DM_Systemoptionen.Components[I].Name));
nicht auch
ADOQuery := TADOQuery(DM_Systemoptionen.Components[I]);
gereicht?
Davon abgesehen ist das schöne an Sir Rufos Methode, dass sie mehr entkoppelt ist, d.h. das ursprüngliche Datenmodul "DM_Menu" muss in den folgenden nicht bekannt sein, es wird einfach über den Setter die Connection übergeben. GGf. könnte man doch auch das create des Datenmoduls überschreiben (oder?) und da direkt die Connection übergeben?
Da man da ggf. auch bereits weiß wie alle Querys heißen, muss man dann auch nicht durch alle Komponenten nach den Querys suchen.
Umgekehrt ist die Setter-Funktion natürlich in anderen Datenmodulen wiederverwertbar egal wie die Querys dsa heißen.
Ralph
|