Moin!
Zitat von
EvilDragon:
Zu2.
aber das mit 2 raf ich net, wie meinst soll ich array nutzen....als zähler???
Nutze eine TStringList und missbrauche die Objekt Eigenschaft als Speicherplatz für deinen Zähler:
Delphi-Quellcode:
StrL := TStringList.Create;
StrL.LoadFromFile('top100');
// so, lied A wird abgespielt
Index := StrL.IndexOf(A);
Counter := Integer(StrL.Objects[Index]);
Inc(Counter);
StrL.Objects[Index] := TObject(Counter);
Mir fällt nur noch ein, das du dir was beim Speichern überlegen musst, da die Objekte nicht mit gespeichert werden...
MfG
Muetze1