Die Komponenten angeben

Nach oben zu Komponenten zur Entwurfszeit verfügbar machen - Index

In der Prozedur Register übergeben Sie die Komponentennamen in einem Open-Array, welches Sie innerhalb des Aufrufs von RegisterComponents erzeugen können:

 RegisterComponents('Verschiedene', [TMyComponent]);

 TMetaClass classes[1] = {__classid(TNewComponent)};

Wie das folgende Beispiel zeigt, können Sie auch mehrere Komponenten zugleich in derselben Registerkarte oder in verschiedenen Registerkarten registrieren:

 procedure Register;
 begin
   RegisterComponents('Verschiedene', [TFirst, TSecond]);             { Zwei auf einer Seite... }
   RegisterComponents('Assorted', [TThird]);                         { eine auf einer anderen ... }
   RegisterComponents(LoadStr(srStandard), [TFourth]);    { und eine auf der Standardseite }
 end;

 <?Pub Caret1?>TMetaClass classes[2] =
 {__classid(TNewComponent), __classid(TAnotherComponent)};

 
 // Eine andere Möglichkeit, einem Array eine Komponente hinzuzufügen
 TMetaClass classes[2];
 classes[0] = __classid(TNewComponent);
 classes[1] = __classid(TAnotherComponent);