(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
Delphi 11 Alexandria
|
Re: Komponentenentwicklung - Zwei DataSourcen im Objektinspe
8. Feb 2008, 23:51
Moin Till,
nur mal so als Idee:
Die beiden Properties in der Custom-Klasse protected deklarieren, und erst in der abgeleiteten Klasse in published einbauen, also so:
Delphi-Quellcode:
type
TCustomDBLookupLabel = Class( TCustomLabel )
protected
Property DataSource: TDataSource Read GetDataSource Write SetDataSource;
Property DataFieldName: WideString Read FDataFieldName Write SetDataFieldName;
end;
TDBUnitLookupLabel = Class( TCustomDBLookupLabel )
published
property DataSource;
property DataFieldName;
Property QuantityFieldName: WideString Read FQuantityFieldName Write SetQuantityFieldName;
Property QuantityDataSource: TDataSource Read GetQuantityDataSource Write SetQuantityDataSource;
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|