Forum: Object-Pascal / Delphi-Language
by DeddyH,
13. Feb 2014
Es geht doch um Doppler, oder? Dann könntest Du die Liste auch sortieren, (rückwärts) durchlaufen und das aktuelle Element mit seinem Vorgänger vergleichen und ggf.löschen.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
13. Feb 2014
Was ich nicht verstehe: wozu erst eine zweite Liste anlegen, du kannst die ursprüngliche doch direkt verwenden, oder übersehe ich da etwas?
for i := Liste.Count - 1 downto 0 do
if Bedingung(Liste) then
Liste.Delete(i);
oder auch
i := 0;
while i < Liste.Count do
begin
if Bedingung(Liste) then
Liste.Delete(i)
Forum: Object-Pascal / Delphi-Language
by DeddyH,
13. Feb 2014
Ich steig bei dem Code zwar nicht ganz durch (und Delphi 5 mag ich auch nicht glauben), aber wenn die Liste die Elementindizes der anderen Liste aufnimmt, solltest Du diese rückwärts durchlaufen. Und wieso ziehst Du a wieder ab beim Löschen?