Ich leite eine Komponente von TImage ab. Kann ich dem irgendwie die Eigenschaft TImageColumns (von TListView) geben oder muss ich sowas selber programmieren ?
Delphi-Quellcode:
unit MeinImage;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TMeinImage =
class(TImage)
FList : TListColumns;
private
{ Private-Deklarationen }
procedure Zeig;
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
published
{ Published-Deklarationen }
property List : TListColumns
read FList
write FList;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('
Plus', [TImage1]);
end;
Das funktioniert nämlich nicht ...
Undefinierter Bezeichner: 'TListColumns'.