Anzahl unterschiedlicher Einträge in einer StringList

eherzel · Beiträge: 22 XP D5 Enterp

Wie kann man am schnellsten die Anzahl unterschiedlicher Einträge in einer StringList feststellen, Beispiele:

'A', 'A', 'A' -> 1
'A', 'B', 'B' -> 2
'A', 'B', 'C' -> 3
'A', 'B', 'A' -> 2

Vielleicht hatte ja jemand schon einmal dieses Problem und kann mir den Code zur Verfügung stellen, ansonsten werd ich wohl das Rad neu erfinden müssen...

_________________
programming today is a race between software engineers striving to build bigger and better idiot-proof programs,
and the Universe trying to produce bigger and better idiots" - "So far, the Universe is winning..."

Gausi · Verfasst: Mi 02.08.06 17:16

Ich würde die Liste einfach sortieren (oder eine Kopie der Liste), und mich dann durchhangeln:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

Anzahl := 1; // das erste Element
for i := 1 to Liste.count - 1 do
begin
  if Liste[i] <> Liste [i-1] then inc(Anzahl);
end;

Eine andere Möglichkeit wäre, dass man in der Liste generell nur eindeutige Einträge erlaubt. Anhandd der Frage nehme ich aber an, dass das nicht gewollt ist.

_________________
We are, we were and will not be.

eherzel · Beiträge: 22 XP D5 Enterp

ein sehr guter Ansatz, danke für den Tip!!!

_________________
programming today is a race between software engineers striving to build bigger and better idiot-proof programs,
and the Universe trying to produce bigger and better idiots" - "So far, the Universe is winning..."

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme