Einzelnen Beitrag anzeigen

Apollonius

Registriert seit: 16. Apr 2007
2.325 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: RichEdit mit einer Ableitung von TStringlist laufen lass

  Alt 8. Mär 2009, 16:45
Es geht einfacher, wenn du zur Laufzeit die Klasse der verwendeten TStrings austauschst; das ist allerdings ein Hack.
TClass(PPointer(Richedit1.Lines)^) := TOStrings. Dabei musst du allerdings beachten, dass du in der Ableitung keine neuen Felder einführen darfst.
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
  Mit Zitat antworten Zitat