Kombinationen von Strings

[Nersgatt]

Zitat von haentschman:

for S1 in StringList1 do ...echt sowas geht ? Muß ich mal ausprobieren...

In Verbindung mit Generics finde ich das noch viel spannender:

Delphi-Quellcode:

  TAuto = class
    public
      Marke : string;
      Typ : string;
      Farbe : String;
  end;
  TGarage = TList<TAuto>;

...

Delphi-Quellcode:

  MeineGarage := TGarage.Create;
  try
    auto := TAuto.Create;
    auto.Marke := 'Porsche';
    auto.Typ := '911';
    Auto.Farbe := 'Blau';

    MeineGarage.Add(Auto);

    for auto in MeineGarage do
      ShowMessage(auto.Marke);

  finally
    MeineGarage.Free;
  end;