Forum: Object-Pascal / Delphi-Language
Delphi
by squetk,
17. Jun 2009
Ich sehe grad: TIComponent ist ja keine eigene Klasse.
Haben die Componenten IEdit,IComboBox,IComboBoxList eine gemeinsame Basisklasse?
Ansonsten klappts mit TPersistentClass als Metaklasse.
Forum: Object-Pascal / Delphi-Language
Delphi
by squetk,
17. Jun 2009
Das lässt sich mit dem Einsatz von Metaklassen lösen.
Ungefähr so:
TIComponent = (IEdit,IComboBox,IComboBoxList, ...)
TIComponentMeta = class of TIComponent;
procedure TComponentManager.NewControl(AType:TIComponentMeta;
AName,ATitle,AValue,AHint,AList:String;