Einzelnen Beitrag anzeigen

Elvis

Registriert seit: 25. Nov 2005
Ort: München
1.909 Beiträge
 
Delphi 2010 Professional
 
#2

Re: With MyObject as MyObject.ClassType Do

  Alt 25. Mai 2007, 12:52
Zitat von QuickAndDirty:
With MyObject as MyObject.ClassType Do Wie kann ich sowas erreichen?

Es handelt sich um 2 Tdataset Nachfahren die über die selben Methoden verfügen.
Ich kann nur eine davon umschreiben.
Gibt es ein Interface das TTable implemtiert?
Kann ich einfach casten auch wenn die verwendeten Methoden nicht in TDataset vorhanden sind?
Nope, die VCL wurde leider nie aufgepeppt um Interfaces zu benutzen.
Gerade bei Datenbankzugriffskomponenten ist das Ergebnis der Kuddelmuddel den man jetzt hat...

Was du hier machen kannst wäre Wrapper anzulegen, die ein Interface implementieren.
Und dann eine Factory, wo du die Instanz des Datasets reinwirfst und eine Interface referenz des Wrappers zurückbekommst.
Robert Giesecke
I’m a great believer in “Occam’s Razor,” the principle which says:
“If you say something complicated, I’ll slit your throat.”
  Mit Zitat antworten Zitat