Optimierung Code / Alternative zu Stringlist? (Delphi 5)

[frieder2008]

Zitat von ele:

Es gibt da auch noch die THashedStringList, aber ich weiss nicht ab welcher Delphi-Version.

Das wäre es wohl! In D5 gibts das leider nicht. Hat jemand das dazugehörige Script (im Netz find ich jetzt spontan nichts, nur Hinweise, dass es das geben soll)?

Danke und Gruß,
frieder

[RaSoWa1]

Bei langen Stringlisten verwende ich zum Suchen nicht "IndexOf".
Folgender Code ist bei mir viel schneller (warum auch immer?):

Delphi-Quellcode:

function InLst(lst: TStrings; s: String): Integer;
var   i : Integer;
begin
  result := -1;
  for i := 0 to lst.Count - 1 do
    if lst[i] = s then
    begin
      result := i;
      Break;
    end
end;

Gruß
Klaus

[ele]

Das liegt vermutlich daran, dass bei Nachfahren von TStrings die virtuelle Methode CompareStrings aufgerufen wird, das ist etwas langsamer als ein direkter Stringvergleich...

Delphi-Quellcode:

function TStrings.IndexOf(const S: string): Integer;
begin
  for Result := 0 to GetCount - 1 do
    if CompareStrings(Get(Result), S) = 0 then Exit;
  Result := -1;
end;

[BUG]

Nur so ne Überlegung...

Gibt es eine Chance alle verschieden Tokens einfach durchgehend zu nummerieren?

Zumindest die Vergleiche könnten schneller werden, wenn man nur noch die Indices vergleicht und vielleicht wird nebenbei auch der Speicherverbrauch kleiner (je nachdem wie viele Strings doppelt vorkommen).

[jobo]

Willst Du die Stringlist nur als Vehikel für deine Operationen oder soll die im Rahmen einer Anwendung irgendwelche GUI Elemente füttern?
Im ersten Fall wär doch vielleicht eine einfache DB angesagt oder?

[frieder2008]

Zitat von jobo:

Willst Du die Stringlist nur als Vehikel für deine Operationen oder soll die im Rahmen einer Anwendung irgendwelche GUI Elemente füttern?
Im ersten Fall wär doch vielleicht eine einfache DB angesagt oder?

Also ich habe zuerst sehr lange Wortlisten, die ich dann zusammenfassen möchte (Wort1=3, Wort2=1200,...). KA, ob da eine DB für ausreichen würde..hm.

Zitat von BUG:

Gibt es eine Chance alle verschieden Tokens einfach durchgehend zu nummerieren?

Das ginge im Prinzip schon, aber macht eig keinen Sinn. Denn ich müsste ja gleichen Tokens gleiche Nummern/Indizes vergeben, wofür ich jeweils doch wieder danach suchen muss, oder?

Du meinst doch:

1 das
2 ist
3 ein
4 Wort
1 das
3 ein
4 Wort
5 ist
6 .

-> 1=2, 2=2, 3=2 usw.
-> das=2, ist=2 usw.

Ich könnte mir nur vorstellen, dass das schneller ginge, wenn ich die Zahlenreihen eben NICHT als Stringlist speichert. Wäre das dann ein Array of integer? (habe bisher nie mit Arrays gearbeitet)

=> Wäre das auch das Prinzip von "HashMaps"?

Danke und Gruß,
frieder

[BUG]

Zitat von frieder2008:

=> Wäre das auch das Prinzip von "HashMaps"?

Nicht ganz, aber stimmt, es geht in die Richtung

Vermutlich ist eine gute fertige Lösung (à la Hashmap oder DB) besser als wenn man sich selbst irgendwas zusammenbastelt.