so, bin auch grad drann an nem musik-katalogisierungsprogramm zu schreiben xD
dabei benutze ich meine eigene "datenbank"
einfach nen record definieren:
Delphi-Quellcode:
TTabelle = Record
Interpret, Album, Titel, Pfad: String[255];
// und was du hier halt noch speichern willst
end;
dann noch ne variable
Tabelle = Array of TTabelle;
zum laden und speichern einfach
Delphi-Quellcode:
function TDatenbank.SaveToFile(Dest: string): Boolean;
var f: file of TTabelle;
I: Cardinal;
begin
result := true;
if high(tabelle) > 1 then
try
assignFile(f, Dest);
reWrite(f);
for I := 1 to high(Tabelle) do
write(f, Tabelle[i]);
closeFile(f);
except
result := false;
end; // try
end;
function TDatenbank.LoadFromFile(Source: string): Boolean;
var f: file of TTabelle;
begin
result := True;
try
try
assignFile(f, Source);
reset(f);
SetLength(Tabelle, 0);
SetLength(Tabelle, FileSize(f)+1);
C := 0;
while not eof(f) do
begin
Inc(C);
read(f, Tabelle[C]);
end;
finally
closeFile(f);
end;
except
result := false;
end; // try
end;
end;
bei ca 18.500 musikfiles brauch das laden und speichern ca 1 sekunde, und das suchen und anzeigen in meiner "datenbank" ne halbe sekunde^^
eine ListView würde ich nicht zum anzeigen empfehlen, eher ein VirtualTreeView