Hi,
also ich hab das jetzt mal so gemacht troztdem habe ich mal noch nen Fehler den
ich nicht behoben bekommen habe.
Hier mal der Code:
Delphi-Quellcode:
Type
TField = class(TObject)
private
FCell : TObjectList;
function GetItem(Index: Integer): TCell;
procedure SetItem(Index: Integer; Item: TCell);
protected
property InnerList : TObjectList read FCell;
public
constructor create();
destructor Destroy; override;
procedure Add(Item : TCell);
procedure Delete(Index: Integer);
property Items[Index: Integer]: TCell read GetItem write SetItem;
end;
function TField.GetItem(Index : Integer) : TCell;
begin
result := FCell.Items[Index];
end;
Bei der Funktion schlägt er mir einen Fehler und zwar das die Typen TCell und TObject nicht die kompatibel sind.
Meine Frage: Was ist falsch bzw. was muss ich am Code ändern?
Gruß
Muss!0
PS: Und vielen Dank für die Viele Hilfe hier!!!