Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Item in TList ändern / aktualisieren

  Alt 24. Jan 2007, 12:44
Das wäre natürlich eine Idee. Meine Klasse sieht jetzt so aus:
Delphi-Quellcode:
type
  TPageCollection = class(TList)
  private
    function GetItem(Index: Integer): TImageEnVect;
    procedure SetItem(Index: Integer; Item: TImageEnVect);
  public
    // ...;
    property Items[Index: Integer]: TImageEnVect read GetItem write SetItem;
    // ...;
  end;

// ...;

function TPageCollection.GetItem(Index: Integer): TImageEnVect;
begin
  Result := inherited Get(Index);
end;

procedure TPageCollection.SetItem(Index: Integer; Item: TImageEnVect);
begin
  self.Items[Index] := Item;
end;

procedure TPageCollection.Update(Index: Integer; Item: TImageEnVect);
begin
  self.Items[Index] := Item;
end;
Aber dann reagiert das Programm gar nicht mehr.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat