Wie bekomm ich das mit dem sortieren hin?

Thema durchsuchen

Ansicht

Themen-Optionen

Wie bekomm ich das mit dem sortieren hin?

Ein Thema von PaulMaler · begonnen am 30. Okt 2015 · letzter Beitrag vom 31. Okt 2015

Vorheriger Beitrag

Nächster Beitrag

frankyboy1974

Registriert seit: 7. Apr 2015
Ort: SH
169 Beiträge

Delphi XE7 Professional

AW: Wie bekomm ich das mit dem sortieren hin?

30. Okt 2015, 19:06

hallo,

ich würde das Problem mit einer Schleife lösen. Du ermittelt das erste Zeichen deiner Zeichenkette, erhöhst deinen Zähler um eins und entfernst anschliessend alle Vorkommen des ersten Zeichen aus deiner Zeichenkette. Dies wiederholst du solange bis die Zeichenkette leer ist.

markieren

Delphi-Quellcode:

			zaehler:=0;

While zeichenkette<>'' do begin

h:=midstr(zeichenkette,1,1);

inc(zaehler);

zeichenkette:=stringreplace(zeichenkette,h,'', [rfReplaceAll, rfIgnoreCase]);

end;

Quellcode Freihand programmiert, nicht getestet.

mfg

Java ist auch eine Insel.