Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bbommel,
14. Okt 2010
Wo kommen die Dateinamen denn her? Spätestens, wenn du als letzten Schritt auch noch den kompletten Pfad nimmst, muss das ganze doch eindeutig sein, oder?
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bbommel,
14. Okt 2010
An der Vergleichsfunktion würde sich aber letztlich eigentlich nichts ändern... :)
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bbommel,
14. Okt 2010
Ich würde es insgesamt etwas knapper so formulieren (inhaltlich auch der gleiche Vorschlag, als eindeutige "ID" den Namen zu nehmen):
function DoCompareByDate(List: TStringList; Index1, Index2: Integer): Integer;
begin
if Assigned(List) then begin
Result:=CompareValue(Integer(List.Objects),Integer(List.Objects));
if Result=0 then
Result:=CompareStr(List,List);
end else...