Objekte zu einer Stringliste bearbeiten

[omata]

Vielleicht so...

Delphi-Quellcode:

var ItemObject:TObject;
    Paar:TPaar;
begin
  ItemObject:=Paare.Objects[pi];
  if ItemObject is TPaar then begin
    Paar:=ItemObject;
    Paar.pEndzeit:=Now; 
  end;
end;

Tipp: WITH braucht man nie