Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#5

Re: Klasse eines Objekts zur Laufzeit ändern

  Alt 14. Jul 2008, 11:18
Zitat von Luckie:
Gibt es dafür auch einen praktischen Anwendungsfall?
Wenn z.B. eine grössere Datenbankanwendung plötzlich mit FoxPro Tabellen arbeiten soll ergibt sich das Problem, dass alle Felder anhängende Leerzeichen haben.
Man könnte bei jedem Zugriff auf ein String-Feld ein TrimRight hinzufügen.
Das ist natürlich sehr aufwendig und manchmal gar nicht möglich.
Man könnte eine Klasse TTrimedStringField von der Klasse TStringField ableiten.
Wenn man dann im Event [TDataSet.]AfterOpen alle TStringField Klassen in TTrimedStringField ändert, kann man das Problem mit wenig Aufwand in der Griff bekommen.

Auch bei Anwendung des State Design-Patterns ist das Ändern der Klasse hilfreich.
Andreas
  Mit Zitat antworten Zitat