Moin lkz,
Du könntest, bei Verwendung von TListBox, die Objekte benutzen, die zu jedem StringList Eintrag gehören.
Kleines Beispiel:
Delphi-Quellcode:
var
iWork : integer;
begin
iWork := integer(ListBox1.Items.Objects[ListBox1.ItemIndex]);
inc(iWork);
ListBox1.Items.Objects[ListBox1.ItemIndex] := TObject(iWork);
end;
Die Hilfsvariable dient nur der Übersicht. Man könnte auch direkt einsetzen.