https://docwiki.embarcadero.com/RADS...nents_aufrufen
RegisterClass
RegisterClassAlias
RegisterClasses
RegisterComponents
RegisterNoIcon
RegisterNonActiveX
UnRegisterClass
UnRegisterClasses
UnRegisterModuleClasses
Man kann seine Klassen auch ableiten
Delphi-Quellcode:
type
TRichEdit = class(TMyRichEdit);
Diese Ableitung im Delphi registrieren und damit das originale TRichEdit überdecken.
Oder,
ich weiß zwar dass es geht, aber nicht wie.
Man kann für die DesignTime EINE Klasse registrieren, welche nur im FormDesigner genutzt wird,
aber so, dass im Code dann eine andere gleichnamige Runtime-Klasse eingefügt wird (inkl. der abweichenden
Unit im USES).
Wie gesagt, wenn es im Designer reicht, wenn die originale TRichEdit dort vorkommt,
aber zur Laufzeit im Programm dann deine Ableitung, dann wurde ja schon gezeigt,
wie man in der selben
Unit vor der Form-Klasse, oder als "letztes" im USES in einer
Unit, dieses TRichEdit durch ein anderes ersetzt werden kann.
Letztes: die
Unit mit dem originalen TRichEdit muß vor der
Unit mit dem neuen TRichEdit stehen, oder halt nach dem USES direkt im Code das "neue" TRichEdit.
Das "Letzte", also was von unten nach oben als Erstes gefunden wird, das wird verwendet.
Zitat:
schubs
In der Form (
DFM) befindet sich z.B. ein TRichEdit.
Im FormDesigner des Delphi liegt dieses TRichEdit auf der Form drauf.
In der
DFM steht nur als String "TRichEdit".
In deiner TForm-Ableitung findet sich dazu eine "Variable" vom Typ TRichEdit (
RichEdit1: TRichEdit;
)
und dieser Typ ist das, was benutzt wird, um die Form-Instanz und draufbefindliche Komponenten zu erstellen.
Hier wurde nun einfach im Code diese TRichEdit-Typ, welchen der Compiler an "dieser" Stelle sieht, durch einen anderen ersetzt.
type TRichEdit = class(TMSRichEdit);
(entweder in selber
Unit, oberhalb der Form, oder in einer
Unit, welche möglichst als Letztes im USES steht)
Somit ist zwar im Designer die andere/originale Komponente auf der Form,
aber im laufenden Programm stattdessen dann eine Andere.