TList

[semo]

eigentlich ist mir das schon klar


so funzt es natürlich:


in procedure ladeZeilen

Code:

for zeile := 1 to lastRow do
    begin
      spalte := 1;
      ExcelZeile := TStringList.Create;
      while (myExcel.Cells[zeile, spalte].Value <> '') do
      begin
        index := ExcelZeile.Add(myExcel.Cells[zeile, spalte].Value);
        Inc(spalte);
      end;
      Schilder.Add(ExcelZeile);
      Caption := IntToStr(Schilder.Count);
    end;

ne neue StringListe für jede Excelzeile anlegen... die in die TList laden.

in der anderen procedure mit arbeiten und dann bei bedarf alle items (stringlisten) der TList wieder freigeben


thx auf diesem wege