danke... hab mal eben alles so gemacht das das programm jeden song in einer ini eintraägt.. startet man das prog neu, schaut er nahc wo der letze eintrag war und macht da dann weiter nun nur noch dsa überprüfen, wenn schon drin dann gehört +1 und dann noch ein schönes form in dem alles angezeigt wird...
hier mal ein kleier code:
Delphi-Quellcode:
// top100
if (id3_tag.EdtArtist.Text='')and(id3_tag.EdtTitle.Text='')then
begin
end
else
begin
initop100 := TiniFile.Create(ExtractFilePath(ParamStr(0))+'inis/top.100');
try
initop100.WriteInteger('top100','eintrag'+IntToStr(eintragtop100),eintragtop100);
initop100.WriteString('top100','artist'+IntToStr(eintragtop100),id3_tag.EdtArtist.Text);
initop100.WriteString('top100','track'+IntToStr(eintragtop100),id3_tag.EdtTitle.Text);
initop100.WriteString('top100','gehoert'+IntToStr(eintragtop100),'1');
finally
initop100.Free;
end;
eintragtop100 := eintragtop100+1;
end;
// top100